{"id":4696,"date":"2017-06-02T08:11:16","date_gmt":"2017-06-01T23:11:16","guid":{"rendered":"http:\/\/sinsei.space\/blog\/?p=4696"},"modified":"2018-06-26T10:07:27","modified_gmt":"2018-06-26T01:07:27","slug":"hex","status":"publish","type":"post","link":"https:\/\/sinsei.space\/blog\/4696","title":{"rendered":"\u5730\u5f62\u751f\u6210\u3092\u8a66\u307f\u308b"},"content":{"rendered":"


\n2017\u5e74 5\u670830\u65e5\uff5e6\u67082\u65e5
\n\u3000<\/strong>
\n\u3000<\/strong>
\n\u3000\u3055\u3066\u3001\u4eca\u56de\u306f MAP\u751f\u6210\u3092\u3084\u3063\u3066\u884c\u304f\u4e8b\u306b\u3059\u308b\u3002
\n\u3000<\/strong>
\n\u3000<\/strong>
\n\u3000\u307e\u305a\u306f\u4e88\u5b9a\u3057\u3066\u3044\u308b\u5c5e\u6027 6\u3064\u306e\u52e2\u529b\u306b\u305d\u308c\u305e\u308c\u5bfe\u5fdc\u3057\u305f\u5730\u5f62\u3068\u3044\u3046\u3082\u306e\u3092\u8003\u3048\u308b\u3002<\/p>\n

\"\"<\/p>\n

\u3000\u5de6\u304b\u3089\u706b\u5c71\uff08\u706b\uff09\u6c34\u8fba\uff08\u6c34\uff09\u8349\u539f\uff08\u98a8\uff09\u5c71\uff08\u5730\uff09\u68ee\uff08\u5149\uff09\u6cbc\u5730\uff08\u95c7\uff09\u3068\u3044\u3046\u4e88\u5b9a\u3002<\/p>\n

\u3000\u305d\u308c\u306b\u3057\u3066\u3082\u3072\u3069\u3044\u30b0\u30e9\u3060\u306a\u3042\u3002<\/p>\n

\u3000\u30b0\u30e9\u306b\u3064\u3044\u3066\u306f\u305d\u306e\u3046\u3061\u30a8\u30f3\u30b8\u30a7\u30eb\u30e1\u30fc\u30ab\u30fc\u6c0f\u306b\u63cf\u3044\u3066\u3082\u3089\u3046\u3068\u3057\u3066\u3001\u3042\u306e\u4eba\u3082\u50cd\u304f\u3060\u3051\u3067\u307b\u3068\u3093\u3069\u6b7b\u3093\u3067\u308b\u304b\u3089\u306a\u3042\u3001\u3042\u3093\u307e\u308a\u671f\u5f85\u306f\u3067\u304d\u306a\u3044\u3002
\n\u3000<\/strong>
\n\u3000<\/strong>
\n\u3000\u3068\u308a\u3042\u3048\u305a\u3001\u307e\u305a\u5358\u7d14\u306b\u4e71\u6570\u3067\u8868\u793a\u3057\u3066\u307f\u308b\u3002<\/p>\n

\u3000\u3053\u3093\u306a\u611f\u3058\u3060\"\"<\/p>\n

\u3000\u3053\u308c\u3060\u3051\u3067\u3082\u6226\u7565\u30de\u30c3\u30d7\u3068\u3057\u3066\u306f\u9762\u767d\u304f\u7121\u3044\u306e\u3067\u3001\u9032\u5165\u3067\u304d\u306a\u3044\u5730\u5f62\u3092\u4f5c\u308b\u3002
\n\u3000<\/strong>
\n\u3000<\/strong>
\n\u3000\u3068\u3001\u8a00\u3046\u306e\u306f\u7c21\u5358\u3060\u3051\u3069\u30d7\u30ed\u30b0\u30e9\u30e0\u306f\u591a\u5c11\u3066\u3053\u305a\u3063\u305f\u3002<\/p>\n

\u3000\u4f55\u304c\u96e3\u3057\u3044\u3063\u3066\u5730\u5f62\u304c\u7a7a\u767d\u306b\u3088\u3063\u3066\u5206\u65ad\u3057\u3066\u308b\u306e\u3092\u3069\u3046\u5224\u5225\u3059\u308b\u304b\u5206\u304b\u3089\u306a\u3044\u3002
\n\u3000\u5730\u5f62\u304c\u5168\u90e8\u9678\u7d9a\u304d\u306b\u306a\u3063\u3066\u306a\u3044\u3068\u3001\u3068\u308a\u3042\u3048\u305a\u30b2\u30fc\u30e0\u3092\u30af\u30ea\u30a2\u3067\u304d\u306a\u3044\u3002<\/p>\n

\u3000\u601d\u8003\u932f\u8aa4\u306e\u672b\u3001\u7d50\u5c40 1\u30de\u30b9\u304b\u3089\u96a3\u63a5\u3059\u308b\u30de\u30b9\u3092\u8abf\u3079\u3066\u3044\u3063\u3066\u3001\u5168\u90e8\u8abf\u3079\u305f\u6642\u306b\u6700\u521d\u306b\u51fa\u3057\u305f\u30de\u30b9\u306e\u7dcf\u6570\u3068\u96a3\u63a5\u3067\u8abf\u3079\u305f\u30de\u30b9\u306e\u7dcf\u6570\u304c\u540c\u3058\u306a\u3089\u5168\u90e8\u9678\u7d9a\u304d\u3068\u3044\u3046\u65b9\u6cd5\u306b\u3057\u305f\u3002<\/p>\n

\u3000\u3082\u3063\u3068\u30b9\u30de\u30fc\u30c8\u306a\u65b9\u6cd5\u304c\u3042\u308b\u306e\u304b\u3082\u77e5\u308c\u306a\u3044\u304c\u3001\u81ea\u5206\u306b\u306f\u3053\u308c\u4ee5\u4e0a\u5206\u304b\u3089\u306a\u3044\u3002<\/p>\n

\u3000\u6700\u521d\u306f\u3082\u3046\u4e00\u3064\u306e\u65b9\u6cd5\u3067\u3001\u771f\u3093\u4e2d\u306e 13\u756a\u304b\u3089\u96a3\u63a5\u3059\u308b\u30de\u30c3\u30d7\u3092\u4f5c\u308b\u65b9\u6cd5\u3092\u3084\u3063\u3066\u307f\u305f\u304c\u3001\u3069\u3046\u3082\u5730\u5f62\u304c\u30c0\u30de\u306b\u306a\u3063\u3066\u9762\u767d\u304f\u7121\u3044\u3002<\/p>\n

\u3000\u305d\u3053\u3067\u3001\u59cb\u3081\u306b\u4e00\u5ea6 25\u30de\u30b9\u5168\u90e8\u5730\u5f62\u3067\u57cb\u3081\u3066\u304b\u3089\u3001\u5730\u5f62\u7121\u3057\u3092\u30e9\u30f3\u30c0\u30e0\u306b\u5f15\u304d\u7b97\u3059\u308b\u4e8b\u306b\u3057\u305f\u3001
\n\u3000\u3053\u3046\u3059\u308b\u3068\u3044\u3044\u5177\u5408\u306b\u5730\u5f62\u306b\u5909\u5316\u304c\u51fa\u308b\u3002<\/p>\n

\u3000\u4eca\u306f\u4e00\u5fdc\u5f15\u304d\u7b97\u3059\u308b\u306e\u306f 5\u30de\u30b9\u306b\u3057\u305f\u3002<\/p>\n

\u30005\u30de\u30b9\u3067\u3082\u3053\u3093\u306a\u611f\u3058\u306b\u3067\u304d\u308b\"\"<\/p>\n

\u3000\u30bd\u30fc\u30b9 <\/p>\n

\/\/\/\/\/\/\/ \u5730\u5f62\u751f\u6210\u30d7\u30ed\u30b0\u30e9\u30e0 \/\/\/\/\/\/\/\r\n\r\n#include \"hsp3dish.as\"\r\n\r\ngosub *main : end\r\n\r\n\r\n#deffunc map_check ; 6\u56de\u540c\u3058\u51e6\u7406\u306a\u306e\u3067\u4e00\u3064\u306b\u307e\u3068\u3081\r\n\r\n\tif map(m)=0 : return ; \u5730\u5f62\u7121\u3057\r\n\r\n\tf=0\r\n\trepeat 25 : cn=cnt\r\n\t if mf(cn)=0 : break ; \u767b\u9332\u306f\u3082\u3046\u7121\u3044\u3088\r\n\t if mf(cn)=m : f=1 : break ; \u767b\u9332\u6e08\u307f\r\n\tloop\r\n\tif f=1 : return ; \u767b\u9332\u6e08\u307f\r\n\r\n\tmf(cn)=m ; \u30c1\u30a7\u30c3\u30af\u6e08\u307f\u306b\u767b\u9332\r\n\r\n\treturn\r\n\r\n\r\n*main\r\n\r\n\tscreen 0,640,360\r\n\r\n\tcelload \"hex_104_90_map.png\",1\r\n\t celdiv 1,104,96\r\n\r\n\tdim hxyd,2,26\t; HEX\u5ea7\u6a19\u5909\u6570\uff080=x\u30011=y\uff09\r\n\t bload \"hxyd.dat\",hxyd ; HEX\u5ea7\u6a19\u30c7\u30fc\u30bf\u8aad\u307f\u8fbc\u307f\r\n\r\n\tdim txyd,4,26\t; \u30bf\u30c3\u30d7\u5ea7\u6a19\u5909\u6570\uff080=tx1\u30011=ty1\u30012=tx2\u30013=ty2\uff09\r\n\t bload \"txyd.dat\",txyd ; \u30bf\u30c3\u30d7\u5ea7\u6a19\u30c7\u30fc\u30bf\u8aad\u307f\u8fbc\u307f\r\n\r\n\trandomize\r\n\r\n\r\n\trepeat ;------- \u30de\u30c3\u30d7\u751f\u6210 -------\r\n\r\n\t dim map,26\r\n; \u30de\u30c3\u30d7\uff080=\u7121\u3057\u30011=\u706b\u5c71\u30012=\u6c34\u8fba\u30013=\u8349\u539f\u30014=\u5c71\u30015=\u68ee\u30016\u6cbc\uff09\r\n\r\n\t dim mf,26 ; \u751f\u6210\u30c1\u30a7\u30c3\u30af\u30d5\u30e9\u30b0\r\n\r\n\t mapg=0 ; \u3044\u304f\u3064\u5730\u5f62\u3092\u4f5c\u3063\u305f\u304b\r\n\t mfn=0  ; \u6b21\u306b\u51e6\u7406\u3059\u308b MAP No.\r\n\r\n\t repeat 25,1 ; MAP\u3092\u5730\u5f62\u3067\u57cb\u3081\u308b\r\n\t  r=rnd(6)+1 : map(cnt)=r\r\n\t loop\r\n\r\n\t repeat 5 ; \u30e9\u30f3\u30c0\u30e0\u306b5\u3064\u5730\u5f62\u3092\u6d88\u3059\r\n\t  r=rnd(25)+1\r\n\t  map(r)=0\r\n\t loop\r\n\r\n\t bn=0 ; \u5730\u5f62\u7121\u3057\u306e\u30de\u30b9\u6570\r\n\t repeat 25,1\r\n\t  if map(cnt)=0 : bn+\r\n\t loop\r\n\r\n\t mapg=25-bn ; \u5730\u5f62\u6709\u308a\u306e\u30de\u30b9\u6570\r\n\r\n\t repeat 25,1 ; \u59cb\u3081\u308b\u30de\u30c3\u30d7\u306e\u4f4d\u7f6e\r\n\t  if map(cnt)>0 : mapn=cnt : mf(mfn)=mapn : mfn+ : break\r\n\t loop\r\n\r\n\r\n\t f=0\r\n\t repeat 25 ; \u96a3\u63a5\u30de\u30c3\u30d7\u9806\u306b\u9806\u6b21\u78ba\u8a8d\u51e6\u7406-------------------------------\r\n\r\n\t  repeat 1 ; \u4e0a\u306f\u3042\u308b\u304b -------------------------\r\n\t   if mapn\\7=1 or mapn\\7=5 : break ; \u4e0a\u304c\u7121\u3044\u5730\u5f62\u306a\u3089\u7d42\u308f\u308a\r\n\t   m=mapn-1 ; \u4e0a\u306e\u30de\u30c3\u30d7\u5ea7\u6a19\r\n\r\n\t   map_check ; \u30de\u30c3\u30d7\u30c1\u30a7\u30c3\u30af\u3068\u66f8\u304d\u8fbc\u307f\u51e6\u7406\r\n\t  loop\r\n\r\n\t  repeat 1 ; \u53f3\u4e0a\u306f\u3042\u308b\u304b -----------------------\r\n\t   if mapn\\7=1 or mapn>=22 : break ; \u53f3\u4e0a\u304c\u7121\u3044\u5730\u5f62\u306a\u3089\u7d42\u308f\u308a\r\n\t   m=mapn+3 ; \u53f3\u4e0a\u306e\u30de\u30c3\u30d7\u5ea7\u6a19\r\n\r\n\t   map_check ; \u30de\u30c3\u30d7\u30c1\u30a7\u30c3\u30af\u3068\u66f8\u304d\u8fbc\u307f\u51e6\u7406\r\n\t  loop\r\n\r\n\t  repeat 1 ; \u53f3\u4e0b\u306f\u3042\u308b\u304b -----------------------\r\n\t   if mapn\\7=4 or mapn>=22 : break ; \u53f3\u4e0b\u304c\u7121\u3044\u5730\u5f62\u306a\u3089\u7d42\u308f\u308a\r\n\t   m=mapn+4 ; \u53f3\u4e0b\u306e\u30de\u30c3\u30d7\u5ea7\u6a19\r\n\r\n\t   map_check ; \u30de\u30c3\u30d7\u30c1\u30a7\u30c3\u30af\u3068\u66f8\u304d\u8fbc\u307f\u51e6\u7406\r\n\t  loop\r\n\r\n\t  repeat 1 ; \u4e0b\u306f\u3042\u308b\u304b -------------------------\r\n\t   if mapn\\7=0 or mapn\\7=4 : break ; \u4e0b\u304c\u7121\u3044\u5730\u5f62\u306a\u3089\u7d42\u308f\u308a\r\n\t   m=mapn+1 ; \u4e0b\u306e\u30de\u30c3\u30d7\u5ea7\u6a19\r\n\r\n\t   map_check ; \u30de\u30c3\u30d7\u30c1\u30a7\u30c3\u30af\u3068\u66f8\u304d\u8fbc\u307f\u51e6\u7406\r\n\t  loop\r\n\r\n\t  repeat 1 ; \u5de6\u4e0a\u306f\u3042\u308b\u304b -----------------------\r\n\t   if mapn\\7=1 or mapn<=4 : break ; \u5de6\u4e0a\u304c\u7121\u3044\u5730\u5f62\u306a\u3089\u7d42\u308f\u308a\r\n\t   m=mapn-4 ; \u5de6\u4e0a\u306e\u30de\u30c3\u30d7\u5ea7\u6a19\r\n\r\n\t   map_check ; \u30de\u30c3\u30d7\u30c1\u30a7\u30c3\u30af\u3068\u66f8\u304d\u8fbc\u307f\u51e6\u7406\r\n\t  loop\r\n\r\n\t  repeat 1 ; \u5de6\u4e0b\u306f\u3042\u308b\u304b -----------------------\r\n\t   if mapn\\7=4 or mapn<=4 : break ; \u5de6\u4e0b\u304c\u7121\u3044\u5730\u5f62\u306a\u3089\u7d42\u308f\u308a\r\n\t   m=mapn-3 ; \u5de6\u4e0b\u306e\u30de\u30c3\u30d7\u5ea7\u6a19\r\n\r\n\t   map_check ; \u30de\u30c3\u30d7\u30c1\u30a7\u30c3\u30af\u3068\u66f8\u304d\u8fbc\u307f\u51e6\u7406\r\n\t  loop\r\n\r\n\r\n\t  mapn=mf(mfn) : mfn+ ; \u6b21\u306b\u30c1\u30a7\u30c3\u30af\u3059\u308b\u5730\u5f62\r\n\t   if mapn=0 : break ; \u304c\u7121\u3044\u306a\u3089\u7d42\u308f\u308a\r\n\r\n\t  if mapg=mfn : f=2 : break ; \u30c1\u30a7\u30c3\u30af\u6570\u3068\u30de\u30b9\u6700\u5927\u6570\u304c\u540c\u3058\u306a\u3089\u5168\u90e8\u7e4b\u304c\u3063\u3066\u308b\u3068\u307f\u306a\u3057\u3066\u5b8c\u6210\r\n\t loop\r\n\r\n\t if f=2 : break\r\n\tloop\r\n\r\n\r\n\tredraw 0;------- \u8868\u793a -------\r\n\t color 0,0,0 : boxf : color 255,255,255\r\n\r\n\t gmode 2\r\n\r\n\t repeat 25,1\r\n\t  x=hxyd(0,cnt) : y=hxyd(1,cnt)\r\n\t  pos x,y : celput 1,map(cnt)+5 ; HEX\u63cf\u753b\r\n\t  n=map(cnt)\r\n\t  pos x+86,y+38 : mes n ;map(cnt) ; \u30de\u30b9\u756a\u53f7\u8868\u793a\r\n\t  pos 10,10 : mes bn\r\n\t loop\r\n\tredraw 1\r\n\r\n\trepeat\r\n\t stick k,,0 : if k=128 : break\r\n\t await 1000\/20\r\n\tloop\r\n\r\n\treturn\r\n<\/pre>\n
\u30006\u89d2\u5f62 HEX\u306e\u96a3\u63a5\u30de\u30b9\u306e\u79fb\u52d5\u5ea7\u6a19\u8a08\u7b97\u306e\u4ed5\u65b9\u3002<\/p>\n
\u3000\u4e0a\u306f-1\u3001\u4e0b\u306f+1\u3060\u3068\u3057\u3066\u3001\u53f3\u4e0a\u306f\u5fc5\u305a+3\u3001\u53f3\u4e0b\u306f\u5fc5\u305a+4\u3001\u5de6\u4e0b\u306f-3\u3001\u5de6\u4e0a\u306f-4\u306b\u306a\u308b\u3002<\/p>\n
\u3000\u3053\u308c\u306f\u3053\u306e\u30de\u30c3\u30d7\u304c\u7e26 4+3\u3067 7\u3067\u4e00\u5468\u3059\u308b\u304b\u3089\u3002<\/p>\n
\u3000\u3082\u3061\u308d\u3093\u5ea7\u6a19\u306e\u53d6\u308a\u65b9\u304cx,y\u306e\u3088\u3046\u306a\u3082\u306e\u306a\u3089\u3001\u5225\u306e\u3084\u308a\u65b9\u306b\u306a\u308b\u3060\u308d\u3046\u3002<\/p>\n
\u3000\u5916\u5468\u306e\u7a7a\u767d\u306b\u96a3\u63a5\u3059\u308b\u30de\u30b9\u306f\u4f8b\u5916\u8a2d\u5b9a\u3092\u8a2d\u3051\u3066\u3044\u308b if mapn\\7=0<\/span>\u306e\u3088\u3046\u306a\u3082\u306e\u3060\u3002
\n\u3000\u3053\u308c\u306f 7\u306e\u500d\u6570\u306e HEX\u756a\u53f7\u306e\u4e0a\u306f\u7121\u3044\u4e8b\u3092\u610f\u5473\u3057\u307e\u3059\u3002<\/p>\n
\u3000\u30c7\u30fc\u30bf\u3068\u30bd\u30fc\u30b9\u306e\u30bb\u30c3\u30c8\u3092\u30c0\u30a6\u30f3\u30ed\u30fc\u30c9\u51fa\u6765\u308b\u3088\u3046\u306b\u3059\u308b\u306e\u3067\u3001\u53c2\u8003\u306b\u3057\u305f\u3044\u4eba\u306f\u3069\u3046\u305e\u3002<\/p>\n
hex_bulid<\/a>\u3000\u2190zip\u30d5\u30a9\u30eb\u30c0<\/p>\n","protected":false},"excerpt":{"rendered":"
2017\u5e74 5\u670830\u65e5\uff5e6\u67082\u65e5 \u3000 \u3000 \u3000\u3055\u3066\u3001\u4eca\u56de\u306f MAP\u751f\u6210\u3092\u3084\u3063\u3066\u884c\u304f\u4e8b\u306b\u3059\u308b\u3002 \u3000 \u3000 \u3000\u307e\u305a\u306f\u4e88\u5b9a\u3057\u3066\u3044\u308b\u5c5e\u6027 6\u3064\u306e\u52e2\u529b\u306b\u305d\u308c\u305e\u308c\u5bfe\u5fdc\u3057\u305f\u5730\u5f62\u3068\u3044\u3046\u3082\u306e\u3092\u8003\u3048\u308b\u3002 \u3000\u5de6\u304b\u3089\u706b\u5c71\uff08\u706b\uff09\u6c34\u8fba\uff08\u6c34\uff09\u8349\u539f\uff08\u98a8\uff09\u5c71 … “\u5730\u5f62\u751f\u6210\u3092\u8a66\u307f\u308b” \u306e<\/span>\u7d9a\u304d\u3092\u8aad\u3080<\/a><\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"closed","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[16,13],"tags":[],"class_list":["post-4696","post","type-post","status-publish","format-standard","hentry","category-hextrategy","category-13"],"_links":{"self":[{"href":"https:\/\/sinsei.space\/blog\/wp-json\/wp\/v2\/posts\/4696","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/sinsei.space\/blog\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/sinsei.space\/blog\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/sinsei.space\/blog\/wp-json\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/sinsei.space\/blog\/wp-json\/wp\/v2\/comments?post=4696"}],"version-history":[{"count":17,"href":"https:\/\/sinsei.space\/blog\/wp-json\/wp\/v2\/posts\/4696\/revisions"}],"predecessor-version":[{"id":6872,"href":"https:\/\/sinsei.space\/blog\/wp-json\/wp\/v2\/posts\/4696\/revisions\/6872"}],"wp:attachment":[{"href":"https:\/\/sinsei.space\/blog\/wp-json\/wp\/v2\/media?parent=4696"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/sinsei.space\/blog\/wp-json\/wp\/v2\/categories?post=4696"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/sinsei.space\/blog\/wp-json\/wp\/v2\/tags?post=4696"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}