{"id":5816,"date":"2018-03-02T08:45:49","date_gmt":"2018-03-01T23:45:49","guid":{"rendered":"http:\/\/sinsei.space\/blog\/?p=5816"},"modified":"2018-06-26T09:48:27","modified_gmt":"2018-06-26T00:48:27","slug":"%e6%88%a6%e9%97%98%e3%81%ae%e3%83%97%e3%83%ad%e3%82%b0%e3%83%a9%e3%83%a0%e3%82%92%e6%95%b4%e7%90%86%e3%81%97%e3%81%9f","status":"publish","type":"post","link":"https:\/\/sinsei.space\/blog\/5816","title":{"rendered":"\u6226\u95d8\u306e\u30d7\u30ed\u30b0\u30e9\u30e0\u3092\u6574\u7406\u3057\u305f"},"content":{"rendered":"<p><font size=4><br \/>\n2018\u5e74 3\u67082\u65e5<br \/>\n<strong>\u3000<\/strong><br \/>\n<strong>\u3000<\/strong><br \/>\n\u30003\u6708\u306b\u3001\u306a\u3063\u3066\u3057\u307e\u3063\u305f\u306a\u3041\u3002<\/p>\n<p>\u30005\u6708\u304b\u3089\u59cb\u3081\u3066\u308b\u304b\u3089\u3001\u3082\u3046 1\u5e74\u306b\u306a\u3063\u3066\u3057\u307e\u3046\u3002<\/p>\n<p>\u3000\u3055\u3066\u3001\u6574\u7406\u306b\u306f 1\u30f6\u6708\u7a0b\u304b\u304b\u308b\u304b\u3068\u601d\u3063\u305f\u3051\u3069\u3001\u3053\u3053\u306e\u6240\u5225\u306e\u4e8b\u3067\u30b4\u30bf\u30b4\u30bf\u3057\u3066\u6642\u9593\u3092\u53d6\u3089\u308c\u305f\u5272\u306b\u306f\u534a\u5206\u306e\u6642\u9593\u3067\u6e08\u3093\u3060\u3002<\/p>\n<p>\u3000\u4f55\u3092\u5909\u3048\u305f\u3093\u3060\u3063\u305f\u304b\u3001\u3048\uff5e\u3068\u3002<\/p>\n<p>\u3000\u4e00\u756a\u5909\u3048\u305f\u304b\u3063\u305f\u306e\u306f\u968a\u5217\u306e\u51e6\u7406\u304c\u30b9\u30c3\u30ad\u30ea\u3057\u306a\u3044\u4e8b\u3060\u3063\u305f\u306e\u3067\u3001<span style=\"color: #0000f0;\">fn1fn2<\/span>\u3092\u305d\u308c\u305e\u308c\u6575\u3068\u5473\u65b9\u3067\u305d\u306e\u6642\u306b\u4f7f\u3046 3\u30e6\u30cb\u30c3\u30c8No.\u3067\u683c\u7d0d\u3057\u3066\u4f7f\u3046\u4e8b\u306b\u3057\u305f\u3002<\/p>\n<p>\u3000\u3053\u308c\u3067\u6575 3\u30e6\u30cb\u30c3\u30c8No.\u3092 <span style=\"color: #0000f0;\">ffn<\/span>\u3067\u4f7f\u3063\u3066\u305f\u306e\u3092\u3001\u305d\u308c\u305e\u308c <span style=\"color: #0000f0;\">fn1fn2<\/span>\u3067\u5168\u90e8\u51e6\u7406\u3067\u304d\u308b\u306e\u3067\u666e\u904d\u6027\u304c\u4e0a\u304c\u3063\u305f\u3002<\/p>\n<p>\u3000\u305d\u308c\u3068 <span style=\"color: #0000f0;\">en<\/span>\uff08\u6575\u306e\u30e6\u30cb\u30c3\u30c8No.\uff09<span style=\"color: #0000f0;\">et<\/span>\uff08\u968a\u5217\uff09\u306e\u30d4\u30c3\u30af\u30a2\u30c3\u30d7\u3068\u78ba\u8a8d\u3092 <span style=\"color: #0000f0;\">etf<\/span>\u3068\u3044\u3046\u547d\u4ee4\u306b\u307e\u3068\u3081\u305f\u3002<\/p>\n<p>\u3000\u5f8c\u306f\u3053\u307e\u3054\u307e\u3068\u3057\u305f\u90e8\u5206\u306e\u6574\u7406\u3060\u3001\u899a\u3048\u3066\u306a\u3044\u3002<br \/>\n<strong>\u3000<\/strong><br \/>\n<strong>\u3000<\/strong><br \/>\n\u3000\u3053\u308c\u3067\u6226\u95d8\u90e8\u5206\u306f\u4e00\u65e6\u7d42\u308f\u308a\u306b\u3057\u305f\u3044\u3068\u601d\u3046\u3002<\/p>\n<p>\u3000\u3082\u3046\u75b2\u308c\u305f\u30014\u30f6\u6708\u3082\u304b\u304b\u3063\u3066\u308b\u3001\u5185\u534a\u5206\u306f\u610f\u5916\u306b\u3082\u30a8\u30d5\u30a7\u30af\u30c8\u8868\u793a\u3060\u3063\u305f\u3051\u3069\u3001\u3053\u308c\u306f\u521d\u3081\u3066\u3060\u3063\u305f\u3057\u4eca\u5f8c\u306f\u3082\u3063\u3068\u65e9\u304f\u3067\u304d\u308b\u3088\u3046\u306b\u306a\u308b\u3068\u601d\u3046\u3002<\/p>\n<p>\u3000\u3068\u3044\u3046\u8a33\u3067\u6c17\u5206\u3092\u5909\u3048\u305f\u3044\u3057\u3001\u307e\u3060 ITEM\u306e\u90e8\u5206\u3092\u4f5c\u3063\u3066\u7121\u3044\u3057\u30d0\u30b0\u3082\u3042\u308b\u3051\u3069\u3001\u6b21\u306e\u30de\u30c3\u30d7\u306e\u90fd\u5e02\u30c7\u30fc\u30bf\u306e\u30d7\u30ed\u30b0\u30e9\u30e0\u3001\u8cc7\u6e90\u3068\u304b\u8cc7\u91d1\u3068\u304b\u4eba\u6750\u3068\u304b\u306e\u30de\u30c3\u30d7\u6226\u7565\u8981\u7d20\u3092\u4f5c\u3063\u3066\u3044\u304d\u305f\u3044\u3068\u601d\u3046\u3002<br \/>\n<strong>\u3000<\/strong><br \/>\n<strong>\u3000<\/strong><br \/>\n\u3000\u5f8c\u306f\u3001\u4ee5\u4e0b\u6226\u95d8\u306e\u30bd\u30fc\u30b9\u3092\u51fa\u3059\u3051\u3069\u30012100\u884c\u3068\u3044\u3046\u81a8\u5927\u306a\u91cf\u306a\u306e\u3067\u8868\u793a\u306b\u6ce8\u610f\u3002<\/p>\n<p>\u3000\u30bd\u30fc\u30b9\u306e\u6d41\u308c\u306f main \u2192 \uff08\u6700\u5f8c\u5c3e\u304b\u3089\u9806\u306b\uff09*battle\uff08\u5168\u4f53\uff09 \u2192 *fight\uff081\u968a\uff09 \u2192 *atack\uff08\u500b\u30e6\u30cb\u30c3\u30c8\uff09 \u2192 \u7d30\u3005\u3068\u3057\u305f\u6226\u95d8\u51e6\u7406\u3001\u3068\u306a\u3063\u3066\u308b\u3002<br \/>\n<strong>\u3000<\/strong><br \/>\n<strong>\u3000<\/strong><br \/>\n<!--more--><\/p>\n<pre class=\"lang:hsp decode:true \" >\/\/\/\/\/\/\/ \u6226\u95d8 \/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\r\n\r\n*battle_syoki ; \u6226\u95d8\u521d\u671f \/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\r\n\r\n\tbsb=21\t\t\t; \u6700\u5927\u6570\r\n\tdim bs,6*bsb\t; \u6226\u95d8\u30b9\u30c6\u30fc\u30bf\u30b9\r\n\tbsg=0\t\t\t; \u73fe\u5728\u306e\u30e6\u30cb\u30c3\u30c8\r\n\r\n; \u6226\u95d8\u30b9\u30c6\u30fc\u30bf\u30b9(0=un\u30011=\u706b\u50b7\u30012=\u6c37\u30013=\u9ebb\u75fa\u30014=\u6c17\u7d76\u30015=\u9b45\u60d1\u30016=\u6bd2\u3001\r\n; 7=\u30d5\u30a1\u30a4\u30e4\u30fc\u30a6\u30a8\u30dd\u30f3\u30018=\u30a2\u30a4\u30b9\u30a8\u30f3\u30c1\u30e3\u30f3\u30c8\u30019=\u30a6\u30a4\u30f3\u30c9\u30a8\u30f3\u30c1\u30e3\u30f3\u30c8\u300110=\u30b5\u30f3\u30c0\u30fc\u30a6\u30a8\u30dd\u30f3\u3001\r\n; 11=\u30b0\u30e9\u30d3\u30c6\u30a3\u30a6\u30a8\u30dd\u30f3\u300112=\u30db\u30fc\u30ea\u30fc\u30a6\u30a8\u30dd\u30f3\u300113=\u30c0\u30fc\u30af\u30a6\u30a8\u30dd\u30f3\u3001\r\n; 14=\u653b\u6483\u300115=\u9632\u5fa1\u300116=\u52a0\u901f\u300117=\u6e1b\u901f\u3001\r\n; 18=\u30a6\u30a9\u30fc\u30bf\u30fc\u30b9\u30af\u30ea\u30fc\u30f3\u300119=\u30a6\u30a4\u30f3\u30c9\u30a6\u30a9\u30fc\u30eb\u300120=\u30db\u30fc\u30ea\u30fc\u30e9\u30a4\u30c8\u30b5\u30fc\u30af\u30eb\u3001)\r\n\r\n\tdim zenkou1,5\t; \u5168\u4f53\u52b9\u679c\uff081=\u81ea\u653b\u6483\u30012=\u81ea\u9632\u5fa1\u30013=\u6575\u653b\u6483\u30014=\u6575\u9632\u5fa1\uff09\r\n\r\n\tdim ff1,4\t; force\u30d5\u30e9\u30b0\u3001\u653b\u6483\u5074\r\n\tdim ff2,4\t; force\u30d5\u30e9\u30b0\u3001\u9632\u885b\u5074\r\n\r\n\tdim ft1,10\t; \u653b\u52e2\u5074\u968a\u5217\u30e6\u30cb\u30c3\u30c8No.\r\n\tdim ft2,10\t; \u9632\u885b\u5074\u968a\u5217\u30e6\u30cb\u30c3\u30c8No.\r\n\r\n\tdim fn1,10\t; \u653b\u52e2\u5074\u6226\u95d8\u90e8\u968a\r\n\tdim fn2,10\t; \u9632\u885b\u5074\u6226\u95d8\u90e8\u968a\r\n\r\n\tdim rdpd,3\t; \u30e9\u30f3\u30c0\u30e0\u30d4\u30c3\u30af\u306eun\u683c\u7d0d\r\n\r\n\tdim smnfn,6\t; \u53ec\u9084\u3057\u305fun\u683c\u7d0d\r\n\r\n\tdim sfn,7\t; \u521d\u671f\u968a\u5217un\u683c\u7d0d\r\n\r\n\tdim rfn,4\t; \u8607\u751f\u5019\u88dc\u3068\u8607\u751f\u51e6\u7406\u6642\u306e\u968a\u5217\r\n\r\ndim zputn,7\r\nzputs=\"zk1 \",\"\u706b \",\"\u6c34 \",\"\u98a8 \",\"\u5730 \",\"\u5149 \",\"\u95c7 \"\r\n\treturn\r\n\r\n\r\n#deffunc bw int bwn ; \u30d0\u30c8\u30eb\u30a6\u30a8\u30a4\u30c8\r\n\r\n\trepeat bwn\r\n\t redraw 0\r\n\t  color 0,0,0 : boxf : color 255,255,255\r\n\t  btl_put\r\n\t  efp\r\n\t  dmp_put\r\n\t  bp bpn\r\n\t  dg_put\r\n\t redraw 1\r\n\t await 1000\/20\r\n\tloop\r\n\r\n\treturn\r\n\r\n\r\n#deffunc bpk ; \u30b9\u30c8\u30c3\u30d7\u8868\u793a\r\n\r\n\tredraw 0\r\n\t color 0,0,0 : boxf : color 255,255,255\r\n\t btl_put\r\n\t efp\r\n\t dmp_put\r\n\t bp bpn\r\n\t dg_put\r\n\tredraw 1\r\n\r\n\tpkey ; \u30ad\u30fc\u3092\u62bc\u3059\u307e\u3067\u30b9\u30c8\u30c3\u30d7\r\n\r\n\treturn\r\n\r\n\r\n; \u30d4\u30c3\u30af\u30a2\u30c3\u30d7 --------------------------------------------\r\n\r\n#defcfunc fns int fnsf ; \u5148\u982d\u5224\u5b9a -------------------------------\r\n\r\n\tfnsn=0\r\n\trepeat 3,1\r\n\t if fnsf=1 : fnsn=fn1(cnt)\r\n\t if fnsf=2 : fnsn=fn2(cnt)\r\n\t  if fnsn=0 or ud(fnsn*udb+26)&lt;=0 : continue\r\n\t et=cnt : break\r\n\tloop\r\n\r\n\treturn fnsn\r\n\r\n#defcfunc bsp int bspn ; \u6226\u95d8\u30b9\u30c6\u30fc\u30bf\u30b9\u30c7\u30fc\u30bfNo,\u30d4\u30c3\u30af\r\n\r\n\trepeat 6\r\n\t bsp_bsg=bsb*cnt\r\n\t  if bspn=bs(bsp_bsg) : break\r\n\tloop\r\n\r\n\treturn bsp_bsg\r\n\r\n\r\n#deffunc bsclr int bsclrn ; \u6226\u95d8\u30b9\u30c6\u30fc\u30bf\u30b9\u30af\u30ea\u30a2\r\n\r\n\trepeat 6\r\n\t bsg=cnt*bsb : if bs(bsg)=bsclrn : break\r\n\tloop\r\n\r\n\trepeat bsb\r\n\t bs(bsg+cnt)=0\r\n\tloop\r\n\r\n\treturn\r\n\r\n\r\n#defcfunc rdp int rdpf ; \u30e9\u30f3\u30c0\u30e0\u30d4\u30c3\u30af\r\n\r\n\trdpn=0 : rdpc=0\r\n\trepeat 3\r\n\t rdpd(cnt)=0 ; \u30ea\u30bb\u30c3\u30c8\r\n\t if rdpf=1 : rdpun=fn1(cnt+1) ; \u81ea\u8ecd\u306e\u5834\u5408\r\n\t if rdpf=2 : rdpun=fn2(cnt+1) ; \u6575\u8ecd\u306e\u5834\u5408\r\n\t if rdpun=0 or ud(rdpun*udb+26)&lt;=0 : continue ; \u3044\u306a\u3044\r\n\t rdpd(rdpc)=rdpun : rdpc+ ; \u5019\u88dc\u683c\u7d0d\r\n\tloop\r\n\tif rdpc=0 : return 0 ; 1\u4eba\u3082\u3044\u306a\u3044\u5834\u5408\r\n\r\n\tr=rnd(rdpc) : rdpn=rdpd(r) ; unNo.\u7167\u4f1a\r\n\r\n\trepeat 3,1 ; et\u78ba\u5b9a\r\n\t if rdpf=1 : if rdpn=fn1(cnt) : et=cnt : break\r\n\t if rdpf=2 : if rdpn=fn2(cnt) : et=cnt : break\r\n\tloop\r\n\r\n\treturn rdpn\r\n\r\n\r\n#deffunc etf int etfn ; \u751f\u5b58\u5224\u5b9a\r\n\r\n\tif fs=1 : en=fn2(etfn) : if en=0 : return\t; \u968a\u5217\u306b\u3044\u306a\u3044\r\n\tif fs=2 : en=fn1(etfn) : if en=0 : return\t; \u968a\u5217\u306b\u3044\u306a\u3044\r\n\teg=en*udb : if ud(eg+26)&lt;=0 : en=0 ; HP\u304c0\r\n\r\n\treturn\r\n\r\n\r\n#defcfunc fsp int fspn ; fs\u5224\u5b9a\r\n\r\n\tfspg=0\r\n\trepeat 3,1\r\n\t if fspn=fn1(cnt) : fspg=1 : break\r\n\t if fspn=fn2(cnt) : fspg=2 : break\r\n\tloop\r\n\r\n\treturn fspg\r\n\r\n\r\n#defcfunc ftp int ftpf,int ftpn ; \u968a\u5217\u756a\u53f7\u30d4\u30c3\u30af\r\n\r\n\tftpg=0\r\n\trepeat 3,1\r\n\t if ftpf=1 : if ftpn=fn1(fs1) : ftpg=cnt : break\r\n\t if ftpf=2 : if ftpn=fn2(fs2) : ftpg=cnt : break\r\n\tloop\r\n\r\n\treturn ftpg\r\n\r\n\r\n#deffunc utfss int utfssn ; un\u304b\u3089\u968a\u5217\u756a\u53f7\u3068fs\u3092\u30d4\u30c3\u30af\r\n\r\n\trepeat 3,1\r\n\t if utfssn=fn1(cnt) : fs=1 : ut=cnt : break\r\n\t if utfssn=fn2(cnt) : fs=2 : ut=cnt : break\r\n\tloop\r\n\r\n\treturn\r\n\r\n\r\n#deffunc rang int rangf,int rangn ; \u5c04\u7a0b\u5224\u5b9a -------------------------------\r\n\r\n\trepeat 3,1 ; \u5c04\u7a0b\r\n\t if rangn&lt;(ut-1)+cnt : break ; \u5c04\u7a0b\u5916\r\n\r\n\t et=cnt\r\n\t  if rangf=1 : en=fn2(et) : if en=0 : continue ; \u968a\u5217\u306b\u3044\u306a\u3044\r\n\t  if rangf=2 : en=fn1(et) : if en=0 : continue ; \u968a\u5217\u306b\u3044\u306a\u3044\r\n\r\n\t eg=en*udb : if ud(eg+26)&lt;=0 : continue ; HP\u304c0\r\n\r\n\t break ; \u653b\u6483\u3057\u305f\r\n\tloop\r\n\r\n\treturn\r\n\r\n\r\n#deffunc brang int brangn ; \u5f8c\u65b9\u304b\u3089\u5c04\u7a0b\u5224\u5b9a -------------------------------\r\n\r\n\trepeat 3 ; \u5c04\u7a0b\r\n\t if brangn&lt;(ut-1)+(3-cnt) : continue ; \u5c04\u7a0b\u5916\r\n\r\n\t et=3-cnt\r\n\t  if fs=1 : en=fn2(et) : if en=0 : continue ; \u968a\u5217\u306b\u3044\u306a\u3044\r\n\t  if fs=2 : en=fn1(et) : if en=0 : continue ; \u968a\u5217\u306b\u3044\u306a\u3044\r\n\r\n\t eg=en*udb : if ud(eg+26)&lt;=0 : continue ; HP\u304c0\r\n\r\n\t break ; \u653b\u6483\u3057\u305f\r\n\tloop\r\n\r\n\treturn\r\n\r\n\r\n\r\n#deffunc fn_syo ; \u968a\u5217\u51e6\u7406 -------------------------------------------\r\n\r\n\tif ud(fn1(1)*udb+26)&lt;=0 : fn1(1)=fn1(2) : fn1(2)=fn1(3) : fn1(3)=0 ; \u5148\u982d\u304c\u3044\u306a\u3051\u308c\u3070\u4e00\u3064\u8a70\u3081\u308b\r\n\tif ud(fn2(1)*udb+26)&lt;=0 : fn2(1)=fn2(2) : fn2(2)=fn2(3) : fn2(3)=0\r\n\r\n\trepeat 3,1\r\n\t if ud(fn1(cnt)*udb+26)&lt;=0 : fn1(cnt)=0 ; HP0\u306a\u3089\u6d88\u53bb\r\n\t if ud(fn2(cnt)*udb+26)&lt;=0 : fn2(cnt)=0 ; HP0\u306a\u3089\u6d88\u53bb\r\n\tloop\r\n\r\n\tfn_syof=0 ; \u5168\u6ec5\u30d5\u30e9\u30b0\r\n\r\n\trepeat 1 ; \u5473\u65b9\r\n\t if fn1(1)&gt;0 or fn1(2)&gt;0 or fn1(3)&gt;0 : break ; \u5168\u6ec5\u3057\u3066\u306a\u3044\r\n\t  fn_syof=1\r\n\r\n\t ff1(fg1)=0 ; \u90e8\u968a\u6d88\u53bb\r\n\t  if ff1(1)&gt;0 or ff1(2)&gt;0 or ff1(3)&gt;0 : btvf- : break ; \u5168\u6ec5\u3057\u3066\u306a\u3044\r\n\r\n\t ff1(0)=0 : btvf=-9 ; \u5168\u6ec5\r\n\tloop\r\n\r\n\trepeat 1 ; \u6575\r\n\t if fn2(1)&gt;0 or fn2(2)&gt;0 or fn2(3)&gt;0 : break ; \u5168\u6ec5\u3057\u3066\u306a\u3044\r\n\t  fn_syof=1\r\n\r\n\t ff2(fg2)=0 ; \u90e8\u968a\u6d88\u53bb\r\n\t  if ff2(1)&gt;0 or ff2(2)&gt;0 or ff2(3)&gt;0 : btvf+ : break ; \u5168\u6ec5\u3057\u3066\u306a\u3044\r\n\r\n\t ff2(0)=0 : btvf=9 ; \u5168\u6ec5\r\n\tloop\r\n\r\n\treturn\r\n\r\n\r\n#deffunc d_syo int d_syon ; \u6b7b\u4ea1\u51e6\u7406\r\n\r\n\tbsclr d_syon ; \u6226\u95d8\u30b9\u30c6\u30fc\u30bf\u30b9\u30af\u30ea\u30a2\r\n\r\n\trepeat 6 ; \u53ec\u9084\u524a\u9664\r\n\t if smnfn(cnt)!d_syon : continue\r\n\t smnfn(cnt)=0 ; \u53ec\u9084un\u524a\u9664\r\n\r\n\t repeat ub-1,1 ; \u30e6\u30cb\u30c3\u30c8\u30c7\u30fc\u30bf\u524a\u9664\r\n\t  un2=cnt : ug2=un2*udb\r\n\t  if ud(ug2)!d_syon : continue\r\n\t  repeat udb\r\n\t   ud(ug2+cnt)=0 ; \u30c7\u30fc\u30bf\u30af\u30ea\u30a2\r\n\t  loop\r\n\t loop\r\n\r\n\t break\r\n\tloop\r\n\r\n\treturn\r\n\r\n\r\n#deffunc scream int screamn1,int screamn2 ; \u7d76\u53eb\r\n\r\n\tun4=screamn1 : ug4=un4*udb\r\n\tun5=screamn2 : ug5=un5*udb\r\n\r\n\tif ud(ug4+8)!34 : return ; \u6301\u3063\u3066\u7121\u3044\r\n\r\n\tr1=rnd(ud(ug4+9)+ud(ug4+22)\/3+1); \u7d76\u53eb\u5024\r\n\tr2=rnd(ud(ug5+22)\/3+1)\t\t\t; \u62b5\u6297\u5024\r\n\r\n\tif r1&lt;=r2 : return ; \u30ec\u30b8\u30b9\u30c8\r\n\r\n\tud(ug5+26)=0\r\n\td_syo un5 ; \u6b7b\u4ea1\u51e6\u7406\r\n\r\n\tscreamf=1\r\n\r\n\treturn\r\n\r\n\r\n; \u30b9\u30c6\u30fc\u30bf\u30b9\u52b9\u679c ------------------------------------------------\r\n\r\n#deffunc sad int sadf,int sadc,int sadn,int sade ; \u30b9\u30c6\u30fc\u30bf\u30b9\u52b9\u679c+\r\n\r\n\tswitch sadf\r\n\t case 1 ; \u5148\u982d\r\n\t  un2=fns(fs) : if un2=0 : swbreak ; \u5148\u982d\u5224\u5b9a\r\n\t  bsg=bsp(un2) : bs(bsg+sadc)+=sadn+mho\r\n\t  bts sade : bw 20 ; \u30a8\u30d5\u30a7\u30af\u30c8\r\n\t swbreak\r\n\t case 2 ; \u30e9\u30f3\u30c0\u30e01\u4f53\r\n\t  un2=rdp(fs) : if un2=0 : swbreak ; \u30e9\u30f3\u30c0\u30e0\u30d4\u30c3\u30af\r\n\t  bsg=bsp(un2) : bs(bsg+sadc)+=sadn+mho\r\n\t  bts sade : bw 20 ; \u30a8\u30d5\u30a7\u30af\u30c8\r\n\t swbreak\r\n\t case 3 ; 3\u4f53\u5168\u54e1\r\n\t  ut2=ut\r\n\t  repeat 3,1\r\n\t   if fs=1 : un2=fn1(cnt)\r\n\t   if fs=2 : un2=fn2(cnt)\r\n\t    if un2=0 or ud(un2*udb+26)&lt;=0 : continue\r\n\t   bsg=bsp(un2) : bs(bsg+sadc)+=sadn+mho\r\n\t   ut=cnt : bts sade ; \u30a8\u30d5\u30a7\u30af\u30c8\r\n\t  loop\r\n\t  bw 20\r\n\t  ut=ut2\r\n\t swbreak\r\n\tswend\r\n\r\n\treturn\r\n\r\n\r\n#deffunc sdc int sdcf,int sdcc,int sdcn,int sdce ; \u30b9\u30c6\u30fc\u30bf\u30b9\u52b9\u679c-\r\n\r\n\tif sdcc=17 : sdcn2=sdcn+mho : else : sdcn2=-sdcn-mho; \u6e1b\u901f\u4ee5\u5916\u306f-\r\n\r\n\tswitch sdcf\r\n\t case 1 ; \u5148\u982d\r\n\t  un2=fns(fs) : if un2=0 : swbreak ; \u5148\u982d\u5224\u5b9a\r\n\t  bsg=bsp(un2) : bs(bsg+sdcc)+=sdcn2\r\n\t  bts sdce : bw 20 ; \u30a8\u30d5\u30a7\u30af\u30c8\r\n\t swbreak\r\n\t case 2 ; \u30e9\u30f3\u30c0\u30e01\u4f53\r\n\t  un2=rdp(fs) : if un2=0 : swbreak ; \u30e9\u30f3\u30c0\u30e0\u30d4\u30c3\u30af\r\n\t  bsg=bsp(un2) : bs(bsg+sdcc)+=sdcn2\r\n\t  bts sdce : bw 20 ; \u30a8\u30d5\u30a7\u30af\u30c8\r\n\t swbreak\r\n\t case 3 ; 3\u4f53\u5168\u54e1\r\n\t  repeat 3,1\r\n\t   if fs=2 : un2=fn1(cnt)\r\n\t   if fs=1 : un2=fn2(cnt)\r\n\t    if un2=0 or ud(un2*udb+26)&lt;=0 : continue\r\n\t   bsg=bsp(un2) : bs(bsg+sdcc)+=sdcn2\r\n\t   et=cnt : bts sdce ; \u30a8\u30d5\u30a7\u30af\u30c8\r\n\t  loop\r\n\t  bw 20\r\n\t swbreak\r\n\tswend\r\n\r\n\treturn\r\n\r\n\r\n#deffunc enc int encf,int encn ; \u30a8\u30f3\u30c1\u30e3\u30f3\u30c8\r\n\r\n\tun2=rdp(fs) : bsg=bsp(un2) ; unNo.\u6c7a\u5b9a\r\n\r\n\tf=0\r\n\trepeat 7 ; \u5225\u7cfb\u7d71\u306e\u30a8\u30f3\u30c1\u30e3\u30f3\u30c8\u304c\u304b\u304b\u3063\u3066\u3044\u308b\u304b\r\n\t if encf=cnt+1 : continue\r\n\t if bs(bsg+7+cnt)&gt;0 : f=1 : break\r\n\tloop\r\n\r\n\trepeat 7,7 ; \u30ea\u30bb\u30c3\u30c8\r\n\t if f=0 : break\r\n\t bs(bsg+cnt)=0\r\n\tloop\r\n\r\n\tbs(bsg+6+encf)+=encn+mho ; \u4ed8\u4e0e\r\n\r\n\treturn\r\n\r\n\r\n#deffunc scr int scrf,int scrn ; \u30b9\u30af\u30ea\u30fc\u30f3\r\n\r\n\tif scrf=2 : n2=18 ; \u30a6\u30a9\u30fc\u30bf\u30fc\u30b9\u30af\u30ea\u30fc\u30f3\r\n\tif scrf=3 : n2=19 ; \u30a6\u30a4\u30f3\u30c9\u30a6\u30a9\u30fc\u30eb\r\n\tif scrf=5 : n2=20 ; \u30db\u30fc\u30ea\u30fc\u30e9\u30a4\u30c8\u30b5\u30fc\u30af\u30eb\r\n\r\n\trepeat 3,1\r\n\t if fs=1 : n=fn1(cnt)\r\n\t if fs=2 : n=fn2(cnt)\r\n\t  bsg=bsp(n)\r\n\r\n\t bs(bsg+n2)+=scrn+mho\r\n\tloop\r\n\r\n\treturn\r\n\r\n\r\n#deffunc mahi int mahif,int mahin,int mahirg,int mahie ; \u9ebb\u75fa\r\n\r\n\tf=0\r\n\tswitch mahif\r\n\t case 0 ; \u5bfe\u8c61\r\n\t  if en=0 : f=1 : swbreak\r\n\t swbreak\r\n\t case 1 ; \u524d\u5217\r\n\t  rang fs,mahirg : if rangf=0 : f=1 : swbreak\r\n\t swbreak\r\n\t case 2 ; \u30e9\u30f3\u30c0\u30e0\r\n\t  if fs=1 : en=rdp(2)\r\n\t  if fs=2 : en=rdp(1)\r\n\t   if en=0 : f=1\r\n\t swbreak\r\n\tswend\r\n\r\n\tif f=1 : return ; \u5bfe\u8c61\u304c\u3044\u306a\u3044\r\n\r\n\tif mahif&gt;0 : bts mahie : bw 20 ; \u30a8\u30d5\u30a7\u30af\u30c8\r\n\r\n\tr1=rnd(mho+mahin+1)\r\n\tr2=rnd(ud(en*udb+22)\/5+1)\r\n\t if r1&lt;=r2 : return ; \u304b\u304b\u3089\u306a\u304b\u3063\u305f\r\n\r\n\tbsg=bsp(en) : bs(bsg+3)+=r1 ; \u9ebb\u75fa\r\n\r\n\treturn\r\n\r\n\r\n#deffunc stun int stunn; \u6c17\u7d76\r\n\r\n\tr1=0 : r2=0 : bsg=bsp(en)\r\n\r\n\trepeat 2\r\n\t r1+=rnd(stunn+ud(ug+34)+1)\t; \u6c17\u7d76\u5024\r\n\t r2+=rnd(ud(eg+21)\/5+1)\t\t; \u7b4b\u529b\u62b5\u6297\u5024\r\n\tloop\r\n\r\n\tn=r1-r2\r\n\t if n&gt;0 : bs(bsg+4)+=n\r\n\r\n\treturn\r\n\r\n\r\n#deffunc poi int poif,int poin,int poirg,int poie ; \u6bd2\r\n\r\n\tf=0\r\n\tswitch poif\r\n\t case 0 ; \u5bfe\u8c61\r\n\t  if en=0 : f=1 : swbreak\r\n\t swbreak\r\n\t case 1 ; \u524d\u5217\r\n\t  rang fs,poirg : if rangf=0 : f=1 : swbreak\r\n\t swbreak\r\n\t case 2 ; \u30e9\u30f3\u30c0\u30e0\r\n\t  if fs=1 : en=rdp(2)\r\n\t  if fs=2 : en=rdp(1)\r\n\t   if en=0 : f=1\r\n\t swbreak\r\n\tswend\r\n\r\n\tif f=1 : return ; \u5bfe\u8c61\u304c\u3044\u306a\u3044\r\n\r\n\tr1=rnd(mho+poin+ud(ug+36)+1)\r\n\tr2=rnd(ud(en*udb+22)\/5+1)\r\n\t if r1&lt;=r2 : return ; \u304b\u304b\u3089\u306a\u304b\u3063\u305f\r\n\r\n\tbsg=bsp(en) : bs(bsg+6)+=r1 ; \u6bd2\r\n\r\n\tif poif&gt;0 : bts poie : bw 20 ; \u30a8\u30d5\u30a7\u30af\u30c8\r\n\r\n\treturn\r\n\r\n\r\n#deffunc temp int tempf,int tempn,int tempe ; \u9b45\u60d1\r\n\r\n\tf=0\r\n\tswitch tempf\r\n\t case 0 ; \u5bfe\u8c61\r\n\t  if en=0 : f=1 : swbreak\r\n\t swbreak\r\n\t case 1 ; \u5bfe\u9762\r\n\t  if fs=1 { ; \u653b\u6483\u5074\r\n\t\t  \t if ut=2 : if fn1(1)&gt;0 : f=1 : swbreak ; \u524d\u306b\u5473\u65b9\u304c\u3044\u308b\r\n\t\t  \t if ut=3 : if fn1(1)&gt;0 or fn1(2)&gt;0 : f=1 : swbreak ; \u3003\r\n\t\t  \t en=0\r\n\t\t  \t repeat 3,1\r\n\t\t  \t  en=fn2(cnt) : if en&gt;0 : et=cnt : break\r\n\t\t  \t loop\r\n\t\t  \t if en=0 : f=1 : swbreak\r\n\t  }\r\n\t  if fs=2 { ; \u9632\u5fa1\u5074\r\n\t\t  \t if ut=2 : if fn2(1)&gt;0 : f=1 : swbreak ; \u524d\u306b\u5473\u65b9\u304c\u3044\u308b\r\n\t\t  \t if ut=3 : if fn2(1)&gt;0 or fn2(2)&gt;0 : f=1 : swbreak ; \u3003\r\n\t\t  \t en=0\r\n\t\t  \t repeat 3,1\r\n\t\t  \t  en=fn1(cnt) : if en&gt;0 : et=cnt : break\r\n\t\t  \t loop\r\n\t\t  \t if en=0 : f=1 : swbreak\r\n\t  }\r\n\t swbreak\r\n\t case 2 ; \u30e9\u30f3\u30c0\u30e0\r\n\t  if fs=1 : en=rdp(2)\r\n\t  if fs=2 : en=rdp(1)\r\n\t   if en=0 : f=1\r\n\t swbreak\r\n\t case 3 ; 3\u4f53\r\n\t  repeat 3,1\r\n\t   et=cnt\r\n\t   if fs=1 : en=fn2(cnt)\r\n\t   if fs=2 : en=fn1(cnt)\r\n\t    if en&lt;=0 : continue\r\n\t\teg=en*udb : if ud(eg+26)&lt;=0 : continue\r\n\t\t r1=rnd(mho+tempn+1)\r\n\t\t r2=rnd(ud(eg+22)\/1+1)\r\n\t\t  if r1&lt;=r2 : continue ; \u304b\u304b\u3089\u306a\u304b\u3063\u305f\r\n\t\t  bsg=bsp(en) : bs(bsg+5)+=r1 ; \u9b45\u60d1\r\n\t  loop\r\n\tswend\r\n\r\n\tif f=1 : return ; \u5bfe\u8c61\u304c\u3044\u306a\u3044\r\n\r\n\trepeat 1 ; \u30a8\u30d5\u30a7\u30af\u30c8\r\n\t if tempf=0 : break\r\n\t if tempf=1 : bts 101 : bw 20 : break ; \u7279\u6b8a\r\n\t bts tempe : bw 20\r\n\tloop\r\n\r\n\tr1=rnd(mho+tempn+1)\r\n\tr2=rnd(ud(en*udb+22)\/5+1)\r\n\t if r1&lt;=r2 : return ; \u304b\u304b\u3089\u306a\u304b\u3063\u305f\r\n\r\n\tbsg=bsp(en) : bs(bsg+5)+=r1 ; \u9b45\u60d1\r\n\r\n\treturn\r\n\r\n\r\n#deffunc curse int cursen ; \u546a\u3044\r\n\r\n\tif fs=1 : en=rdp(2) ; \u5bfe\u8c61\r\n\tif fs=2 : en=rdp(1)\r\n\t if en=0 : return\r\n\r\n\tcursen2=cursen+mho\r\n\r\n\t\r\n\tr1=0 : r2=0 : bsg=bsp(en) ;\u706b\r\n\trepeat 2\r\n\t r1+=rnd(ud(eg+22)\/5+1)\t\t\t; \u9b54\u529b\u62b5\u6297\u5024\r\n\t r2+=rnd(cursen2+ud(ug+31)+1)\t; \u706b\u50b7\u5024\r\n\tloop\r\n\tif r1&lt;r2 : bs(bsg+1)+=r2-r1\r\n\r\n\tr1=0 : r2=0 : bsg=bsp(en) ;\u6c34\r\n\trepeat 2\r\n\t r1+=rnd(ud(eg+22)\/5+1)\t\t\t; \u9b54\u529b\u62b5\u6297\u5024\r\n\t r2+=rnd(cursen2+ud(ug+32)+1)\t; \u6c37\u5024\r\n\tloop\r\n\tif r1&lt;r2 : bs(bsg+2)+=r2-r1\r\n\r\n\tmahi 0,cursen2,0\t; \u9ebb\u75fa\r\n\tstun cursen2\t\t; \u6c17\u7d76\r\n\ttemp 0,cursen2\t\t; \u9b45\u60d1\r\n\t poi 0,cursen2,0\t; \u6bd2\r\n\r\n\tbts 75 : bw 20 ; \u30a8\u30d5\u30a7\u30af\u30c8\r\n\r\n\treturn\r\n\r\n\r\n#deffunc heal int healf,int healn ; \u56de\u5fa9\r\n\r\n\tswitch healf\r\n\t case 1 ; 1\u4f53\r\n\t  n=0 : ft=0\r\n\t  repeat 3,1 ; \u56de\u5fa9\u3059\u308bun\u3092\u7279\u5b9a\uff08HP\u306e\u4f4e\u3044\u9806\uff09\r\n\t   if fs=1 : un2=fn1(cnt)\r\n\t   if fs=2 : un2=fn2(cnt)\r\n\t   \tn1=ud(un2*udb+26) : n2=ud(un2*udb+25)\r\n\t   \t if n1&gt;=n2 : continue ; HP\u304c\u6e1b\u3063\u3066\u306a\u3044\u306e\u3067\u5bfe\u8c61\u5916\r\n\t   \t  if n=0 or n&gt;n1 : n=n1 : ft=cnt : un3=un2\r\n\t  loop\r\n\t  if n=0 : swbreak ; \u5bfe\u8c61\u304c\u3044\u306a\u304b\u3063\u305f\r\n\r\n\t  n1=ud(un3*udb+26)\r\n\t   ud(un3*udb+26)+=healn+mho ; \u56de\u5fa9\r\n\t    if ud(un3*udb+26)&gt;ud(un3*udb+25) : ud(un3*udb+26)=ud(un3*udb+25)\r\n\t  n2=ud(un3*udb+26) : n=n2-n1\r\n\t   if fs=1 : dmp_set n,ft,3\t ; \u56de\u5fa9\u8868\u793a\r\n\t   if fs=2 : dmp_set n,3+ft,3\r\n\t swbreak\r\n\t case 3 ; \u5168\u54e1\r\n\t  repeat 3,1\r\n\t   if fs=1 : un2=fn1(cnt)\r\n\t   if fs=2 : un2=fn2(cnt)\r\n\t    n1=ud(un2*udb+26)\r\n\t     ud(un2*udb+26)+=healn+mho\r\n\t      if ud(un2*udb+26)&gt;ud(un2*udb+25) : ud(un2*udb+26)=ud(un2*udb+25)\r\n\t    n2=ud(un2*udb+26) : n=n2-n1\r\n\t     if n&lt;=0 : continue\r\n\t\t  if fs=1 : dmp_set n,cnt,3\t\t; \u56de\u5fa9\u8868\u793a\r\n\t      if fs=2 : dmp_set n,3+cnt,3\r\n\t  loop\r\n\t swbreak\r\n\tswend\r\n\r\n\treturn\r\n\r\n\r\n#deffunc cure int curef ; \u6cbb\u7642\r\n\r\n\tc=0\r\n\trepeat 3,1 ; \u72b6\u614b\u7570\u5e38\u8005\u3092\u30d4\u30c3\u30af\u30a2\u30c3\u30d7\r\n\t if fs=1 : un2=ft1(fs1+cnt)\r\n\t if fs=2 : un2=ft2(fs2+cnt)\r\n\t  if un2=0 or ud(un2*udb+26)&lt;=0 : continue ; \u3044\u306a\u3044\r\n\t bsg=bsp(un2)\r\n\t  if curef=2 : if bs(bsg+1)=0 and bs(bsg+4)=0 and bs(bsg+5)=0 and bs(bsg+6)=0 : continue ; \u6b63\u5e38\u3001\u6c34\r\n\t  if curef=4 : if bs(bsg+1)=0 and bs(bsg+3)=0 and bs(bsg+4)=0 and bs(bsg+6)=0 : continue ; \u6b63\u5e38\u3001\u5730\r\n\t  if curef=5 : if bs(bsg+1)=0 and bs(bsg+2)=0 and bs(bsg+3)=0 and bs(bsg+4)=0 and bs(bsg+5)=0 and bs(bsg+6)=0 : continue ; \u6b63\u5e38\u3001\u5149\r\n\t   rdpd(c)=bsg : c+ ; \u72b6\u614b\u7570\u5e38\u8005\u3092\u683c\u7d0d\r\n\tloop\r\n\t if c=0 : return ; \u72b6\u614b\u7570\u5e38\u8005\u304c\u3044\u306a\u3044\r\n\r\n\tr=rnd(c) : bsg=rdpd(r) ; \u6cbb\u7642\u8005\u3092\u9078\u629e\r\n\t if curef=2 : bs(bsg+1)=0 : bs(bsg+4)=0 : bs(bsg+5)=0 : bs(bsg+6)=0 ; \u6cbb\u7642\u3001\u6c34\r\n\t if curef=4 : bs(bsg+1)=0 : bs(bsg+3)=0 : bs(bsg+4)=0 : bs(bsg+6)=0 ; \u6cbb\u7642\u3001\u5730\r\n\t if curef=5 : bs(bsg+1)=0 : bs(bsg+2)=0 : bs(bsg+3)=0 : bs(bsg+4)=0 : bs(bsg+5)=0 : bs(bsg+6)=0 ; \u6cbb\u7642\u3001\u5149\r\n\t\r\n\treturn\r\n\r\n\r\n#defcfunc smf int smfn ; \u53ec\u9084\u304b\r\n\r\n\tsmff=0\r\n\trepeat 6 ; \u305d\u306e\u5834\u6240\u306f\u53ec\u9084\u304b\r\n\t en=smnfn(cnt)\r\n\t  if smfn=en : smff=en : break\r\n\tloop\r\n\r\n\treturn smff\r\n\r\n\r\n#deffunc rsr_syo int rsr_syon ; \u8607\u751f\u51e6\u7406\r\n\r\n\tun2=rsr_syon : ug2=un2*udb\r\n\r\n\tud(ug2+26)=ud(ug2+25)*50\/100 ; HP\r\n\r\n\trepeat 3 ; \u7a7a\u304d\u6226\u95d8\u30b9\u30c6\u30fc\u30bf\u30b9\u306b\u30bb\u30c3\u30c8\r\n\t if fs=1 : bsg=cnt*bsb\r\n\t if fs=2 : bsg=(cnt+3)*bsb\r\n\t if bs(bsg)=0 : bs(bsg)=un2 : break\r\n\tloop\r\n\r\n\treturn\r\n\r\n\r\n#deffunc resur ; \u30ea\u30b6\u30ec\u30af\u30b7\u30e7\u30f3\r\n\r\n\r\n\trepeat 3 : rfn(cnt)=0 : loop ; \u30af\u30ea\u30a2\r\n\r\n\tif fs=1 : sfg=0\r\n\tif fs=2 : sfg=3\r\n\r\n\tc=0\r\n\trepeat 3,1 ; \u6b7b\u4ea1\u8005\u30d4\u30c3\u30af\r\n\t rn=sfn(sfg+cnt) : if rn=0 : continue\r\n\t  if ud(rn*udb+26)&lt;=0 : rfn(c)=rn : c+\r\n\tloop\r\n\tif c=0 : return ; \u6b7b\u4ea1\u8005\u304c\u3044\u306a\u3044\r\n\r\n\tr=rnd(c) : rn=rfn(r) ; \u8607\u751f\u8005\u9078\u629e\r\n\r\n\trepeat 3,1 ; \u5143\u306e\u968a\u5217\u5834\u6240\r\n\t if rn=sfn(sfg+cnt) : rt=cnt : break\r\n\tloop\r\n\r\n\trepeat 4 : rfn(cnt)=0 : loop ; rfn\u30ea\u30bb\u30c3\u30c8\r\n\trepeat 3,1 ; \u51e6\u7406\u7528\u968a\u5217\u5909\u6570\u306b\u683c\u7d0d\r\n\t if fs=1 : un2=fn1(cnt)\r\n\t if fs=2 : un2=fn2(cnt)\r\n\t  ug2=un2*udb\r\n\t   if ud(ug2+26)&gt;0 : rfn(cnt)=un2\r\n\tloop\r\n\r\n\ttaif=0\r\n\trepeat 3,1 ; \u968a\u5217\u3044\u304f\u3064\u57cb\u307e\u3063\u3066\u3044\u308b\u304b\r\n\t n=rfn(cnt)\r\n\t if n&gt;0 and ud(n*udb+26)&gt;0 : taif+\r\n\tloop\r\n\r\n\trepeat 1 ; \u968a\u5217\u304c3\u3064\u57cb\u307e\u3063\u3066\u308b\u5834\u5408 ----------------------------\r\n\t if taif!3 : break ; 3\u3064\u3058\u3083\u306a\u3044\r\n\r\n\t en1=smf(rfn(1)) : en2=smf(rfn(2)) : en3=smf(rfn(3)) ; \u53ec\u9084\u304b\r\n\r\n\t switch rt\r\n\t  case 1 ; \u8607\u751f\u3055\u308c\u308b\u8005\u304c1\u5217\u76ee -------------------------\r\n\t   if en1&gt;0 : d_syo en1 : rfn(1)=rn : rsr_syo rn : swbreak ; \u968a\u52171\u304c\u53ec\u9084\u306e\u5834\u5408\r\n\t   if en2&gt;0 and en3=0 { ; \u968a\u52172\u3060\u3051\u53ec\u9084\u306e\u5834\u5408\r\n\t\td_syo en2 ; \u968a\u52172\u306e\u53ec\u9084\u3092\u6d88\u3059\r\n\t\t rfn(2)=rfn(1) : rfn(1)=rn : rsr_syo rn ; \u5165\u308c\u66ff\u3048\r\n\t\tswbreak\r\n\t   }\r\n\t   if en3&gt;0 { ; \u968a\u52173\u304c\u53ec\u9084\u306e\u5834\u5408\r\n\t\td_syo en3 ; \u968a\u52173\u306e\u53ec\u9084\u3092\u6d88\u3059\r\n\t\t rfn(3)=rfn(2) : rfn(2)=rfn(1) : rfn(1)=rn : rsr_syo rn ; \u5165\u308c\u66ff\u3048\r\n\t\tswbreak\r\n\t   }\r\n\t  swbreak\r\n\t  case 2 ; \u8607\u751f\u3055\u308c\u308b\u8005\u304c2\u5217\u76ee -------------------------\r\n; \u4f8b\u59161\r\n\t   if rfn(3)=sfn(sfg+1) { ; \u968a\u52173\u306b1\u304c\u5165\u3063\u3066\u308b\r\n\t\ten1=smf(rfn(1)) : if en1&gt;0 : d_syo en1 ; 1\u306e\u53ec\u9084\u3092\u524a\u9664\r\n\t\trfn(1)=rfn(2) : rfn(2)=rfn(3) : rfn(3)=rn : rsr_syo rn ; \u5165\u308c\u66ff\u3048\r\n\t\tswbreak\r\n\t   }\r\n\t   if rfn(1)=sfn(sfg+3) { ; \u968a\u52171\u306b3\u304c\u5165\u3063\u3066\u308b\r\n\t\ten3=smf(rfn(3)) : if en3&gt;0 : d_syo en3 ; 3\u306e\u53ec\u9084\u3092\u524a\u9664\r\n\t\trfn(3)=rfn(2) : rfn(2)=rfn(1) : rfn(1)=rn : rsr_syo rn ; \u5165\u308c\u66ff\u3048\r\n\t\tswbreak\r\n\t   }\r\n; \u4f8b\u59162\r\n\t   if rfn(2)=sfn(sfg+1) { ; \u968a\u52172\u306b1\u304c\u5165\u3063\u3066\u308b\r\n\t\ten1=smf(rfn(1)) : if en1&gt;0 : d_syo en1 ; 1\u306e\u53ec\u9084\u3092\u524a\u9664\r\n\t\trfn(1)=rfn(2) : rfn(2)=rn : rsr_syo rn ; \u5165\u308c\u66ff\u3048\r\n\t\tswbreak\r\n\t   }\r\n\t   if rfn(2)=sfn(sfg+3) { ; \u968a\u52172\u306b3\u304c\u5165\u3063\u3066\u308b\r\n\t\ten3=smf(rfn(3)) : if en3&gt;0 : d_syo en3 ; 3\u306e\u53ec\u9084\u3092\u524a\u9664\r\n\t\trfn(3)=rfn(2) : rfn(2)=rn : rsr_syo rn ; \u5165\u308c\u66ff\u3048\r\n\t\tswbreak\r\n\t   }\r\n; \u305d\u306e\u4ed6\r\n\t   if en2&gt;0 : d_syo en2 : rfn(2)=rn : rsr_syo rn ; \u968a\u52172\u306f\u53ec\u9084\r\n\t  swbreak\r\n\t  case 3 ; \u8607\u751f\u3055\u308c\u308b\u8005\u304c3\u5217\u76ee -------------------------\r\n\t   if en2&gt;0 and en1=0 { ; \u968a\u52172\u3060\u3051\u53ec\u9084\u306e\u5834\u5408\r\n\t\td_syo en2 : rfn(2)=rfn(3) : rfn(3)=rn : rsr_syo rn ; \u5165\u308c\u66ff\u3048\r\n\t   swbreak\r\n\t   }\r\n; \u305d\u306e\u4ed6\r\n\t   if en1&gt;0 { ; \u968a\u52171\u30012\u304c\u53ec\u9084\u306e\u5834\u5408\r\n\t    d_syo en1 ; \u968a\u52171\u306e\u53ec\u9084\u306f\u6d88\u3059\r\n\t     rfn(1)=rfn(2) : rfn(2)=rfn(3) : rfn(3)=rn : rsr_syo rn ; \u5165\u308c\u66ff\u3048\r\n\t   }\r\n\t  swbreak\r\n\t swend\r\n\tloop\r\n\r\n\trepeat 1 ; \u968a\u5217\u304c2\u3064\u57cb\u307e\u3063\u3066\u308b\u5834\u5408 ----------------------------\r\n\t if taif!2 : break ; 2\u3064\u3058\u3083\u306a\u3044\r\n\r\n\t if rt=1 { ; \u8607\u751f\u3055\u308c\u308b\u8005\u304c1\u5217\u76ee -------------------------\r\n\t  if rfn(1)=0 : rfn(1)=rn : rsr_syo rn : break ; \u968a\u52171\u304c\u7a7a\r\n\t  if rfn(2)=0 : rfn(2)=rfn(1) : rfn(1)=rn : rsr_syo rn : break ; \u968a\u52172\u304c\u7a7a\r\n\t   rfn(3)=rfn(2) : rfn(2)=rfn(1) : rfn(1)=rn : rsr_syo rn : break ; \u968a\u52173\u304c\u7a7a\r\n\t }\r\n\r\n\t if rt=2 { ; \u8607\u751f\u3055\u308c\u308b\u8005\u304c2\u5217\u76ee -------------------------\r\n; \u4f8b\u59161\r\n\t  if rfn(3)&gt;0 and rfn(3)=sfn(sfg+1) { ; \u968a\u52173\u306b1\u304c\u5165\u3063\u3066\u308b\r\n\t   if rfn(2)=0 : rfn(2)=rfn(3) : rfn(3)=rn : rsr_syo rn : break ; \u968a\u52172\u304c\u7a7a\r\n\t    rfn(1)=rfn(2) : rfn(2)=rfn(3) : rfn(3)=rn : rsr_syo rn : break ; \u305d\u306e\u4ed6\r\n\t  }\r\n\t  if rfn(1)&gt;0 and rfn(1)=sfn(sfg+3) { ; \u968a\u52171\u306b3\u304c\u5165\u3063\u3066\u308b\r\n\t   if rfn(2)=0 : rfn(2)=rfn(1) : rfn(1)=rn : rsr_syo rn : break ; \u968a\u52172\u304c\u7a7a\r\n\t    rfn(3)=rfn(2) : rfn(2)=rfn(1) : rfn(1)=rn : rsr_syo rn : break ; \u305d\u306e\u4ed6\r\n\t  }\r\n; \u4f8b\u59162\r\n\t  if rfn(2)&gt;0 and rfn(2)=sfn(sfg+1) { ; \u968a\u52172\u306b1\u304c\u5165\u3063\u3066\u308b\r\n\t   if rfn(3)=0 : rfn(3)=rn : rsr_syo rn : break ; \u968a\u52173\u304c\u7a7a\u3044\u3066\u308b\r\n\t\trfn(1)=rfn(2) : rfn(2)=rn : rsr_syo rn ; \u5165\u308c\u66ff\u3048\r\n\t\tbreak\r\n\t  }\r\n\t  if rfn(2)&gt;0 and rfn(2)=sfn(sfg+3) { ; \u968a\u52172\u306b3\u304c\u5165\u3063\u3066\u308b\r\n\t   if rfn(1)=0 : rfn(1)=rn : rsr_syo rn : break ; \u968a\u52171\u304c\u7a7a\u3044\u3066\u308b\r\n\t\trfn(3)=rfn(2) : rfn(2)=rn : rsr_syo rn ; \u5165\u308c\u66ff\u3048\r\n\t\tbreak\r\n\t  }\r\n; \u305d\u306e\u4ed6\r\n\t  if rfn(1)=0 : rfn(1)=rfn(2) : rfn(2)=rn : rsr_syo rn : break ; \u968a\u52171\u304c\u7a7a\u3044\u3066\u308b\r\n\t  if rfn(3)=0 : rfn(3)=rfn(2) : rfn(2)=rn : rsr_syo rn : break ; \u968a\u52173\u304c\u7a7a\u3044\u3066\u308b\r\n\t }\r\n\r\n\t if rt=3 { ; \u8607\u751f\u3055\u308c\u308b\u8005\u304c3\u5217\u76ee -------------------------\r\n\t  if rfn(3)=0 : rfn(3)=rn : rsr_syo rn : break ; \u968a\u52171\u304c\u7a7a\r\n\t  if rfn(2)=0 : rfn(2)=rfn(3) : rfn(3)=rn : rsr_syo rn : break ; \u968a\u52172\u304c\u7a7a\r\n\t    rfn(1)=rfn(2) : rfn(2)=rfn(3) : rfn(3)=rn : rsr_syo rn : break ; \u968a\u52173\u304c\u7a7a\r\n\t }\r\n\tloop\r\n\r\n\r\n\trepeat 1 ; \u968a\u5217\u304c1\u3064\u57cb\u307e\u3063\u3066\u308b\u5834\u5408 ----------------------------\r\n\t if taif!1 : break ; 1\u3064\u3058\u3083\u306a\u3044\r\n\r\n\t if rt=1 { ; \u8607\u751f\u3055\u308c\u308b\u8005\u304c1\u5217\u76ee -------------------------\r\n\t  if rfn(1)=0 : rfn(1)=rn : rsr_syo rn : break ; \u968a\u52171\u304c\u7a7a\r\n\t  if rfn(2)=0 : rfn(2)=rfn(1) : rfn(1)=rn : rsr_syo rn : break ; \u968a\u52172\u304c\u7a7a\r\n\t }\r\n\r\n\t if rt=2 { ; \u8607\u751f\u3055\u308c\u308b\u8005\u304c2\u5217\u76ee -------------------------\r\n; \u4f8b\u59161\r\n\t  if rfn(3)&gt;0 and rfn(3)=sfn(sfg+1) { ; \u968a\u52173\u306b1\u304c\u5165\u3063\u3066\u308b\r\n\t   rfn(2)=rfn(3) : rfn(3)=rn : rsr_syo rn : break ; \u968a\u52172\u304c\u7a7a\r\n\t  }\r\n\t  if rfn(1)&gt;0 and rfn(1)=sfn(sfg+3) { ; \u968a\u52171\u306b3\u304c\u5165\u3063\u3066\u308b\r\n\t   rfn(2)=rfn(1) : rfn(1)=rn : rsr_syo rn : break ; \u968a\u52172\u304c\u7a7a\r\n\t  }\r\n; \u4f8b\u59162\r\n\t  if rfn(2)&gt;0 and rfn(2)=sfn(sfg+1) { ; \u968a\u52172\u306b1\u304c\u5165\u3063\u3066\u308b\r\n\t\trfn(1)=rfn(2) : rfn(2)=rn : rsr_syo rn : break ; \u5165\u308c\u66ff\u3048\r\n\t\t\r\n\t  }\r\n\t  if rfn(2)&gt;0 and rfn(2)=sfn(sfg+3) { ; \u968a\u52172\u306b3\u304c\u5165\u3063\u3066\u308b\r\n\t\tif rfn(1)=0 : rfn(1)=rn : rsr_syo rn : break ; \u5165\u308c\u66ff\u3048\r\n\t  }\r\n; \u305d\u306e\u4ed6\r\n\t  if rfn(2)=0 : rfn(2)=rn : rsr_syo rn : break ; \u968a\u52172\u304c\u7a7a\r\n\r\n\t  if rfn(2)&gt;0 : rfn(1)=rfn(2) ; \u968a\u52172\u306b\u53ec\u9084\u304c\u3044\u308b\r\n\t  rfn(2)=rn : rsr_syo rn : break ; \u5165\u308c\u66ff\u3048\r\n\t }\r\n\r\n\t if rt=3 { ; \u8607\u751f\u3055\u308c\u308b\u8005\u304c3\u5217\u76ee -------------------------\r\n\t  if rfn(3)=0 : rfn(3)=rn : rsr_syo rn : break ; \u968a\u52173\u304c\u7a7a\r\n\t  if rfn(2)=0 : rfn(2)=rfn(3) : rfn(3)=rn : rsr_syo rn : break ; \u968a\u52172\u304c\u7a7a\r\n\t }\r\n\tloop\r\n\r\n\tbts 63 : bw 10\r\n\trepeat 3,1 ; \u968a\u5217\u683c\u7d0d\r\n\t if fs=1 : fn1(cnt)=rfn(cnt)\r\n\t if fs=2 : fn2(cnt)=rfn(cnt)\r\n\tloop\r\n\tbw 10\r\n;bpk\r\n\treturn\r\n\r\n\r\n#deffunc tad int tadf,int tadn ; \u30bf\u30fc\u30f3\u30a2\u30f3\u30c7\u30c3\u30c9\r\n\r\n\tf=0\r\n\tswitch tadf\r\n\t case 0 ; \u6307\u5b9a\r\n\t  cn=ud(eg)\r\n\t   if cn=184 or cn=185 or cn=186 or cn=197 or cn=202 : f=1 ; \u30a2\u30f3\u30c7\u30c3\u30c9\u3067\u3042\u308b\r\n\t swbreak\r\n\t case 1 ; \u524d\u5217\r\n\t  repeat 3,1\r\n\t   et=cnt : etf et\r\n\t    if en&lt;=0 or ud(eg+26)&lt;=0 : continue ; \u3044\u306a\u3044\r\n\t   cn=ud(eg)\r\n\t    if cn=184 or cn=185 or cn=186 or cn=197 or cn=202 : f=1 : break ; \u30a2\u30f3\u30c7\u30c3\u30c9\u3067\u3042\u308b\r\n\t  loop\r\n\t swbreak\r\n\tswend\r\n\r\n\tif f=0 : return ; \u5bfe\u8c61\u304c\u3044\u306a\u3044\r\n\r\n\tbts 51 : bw 20 ; \u30a8\u30d5\u30a7\u30af\u30c8\r\n\r\n\tr1=rnd(ud(eg+26))\r\n\tr2=rnd(tadn+mho+ud(ug+35))\r\n\r\n\t if r1&gt;=r2 : return ; \u62b5\u6297\u3057\u305f\r\n\r\n\tud(eg+26)=0 : d_syo en ; \u6b7b\u4ea1\u51e6\u7406\r\n\r\n\r\n;bpk\r\n\treturn\r\n\r\n\r\n#deffunc smon int smonf,int smone ; \u53ec\u9084\r\n\r\n\tc=0\r\n\trepeat 3,1\r\n\t if fs=1 : un2=fn1(cnt)\r\n\t if fs=2 : un2=fn2(cnt)\r\n\t  if un2!0 and ud(un2*udb+26)&gt;0 : c+\r\n\tloop\r\n\tif c=3 : return ; \u968a\u5217\u304c\u3044\u3063\u3071\u3044\r\n\r\n\tf=0\r\n\trepeat ub-1,1 ; \u7a7a\u304d\u30e6\u30cb\u30c3\u30c8No.\u30d4\u30c3\u30af\r\n\t un2=cnt : ug2=un2*udb ; \u30e6\u30cb\u30c3\u30c8No.\r\n\t  if ud(ug2)=0 : f=1 : break\r\n\tloop\r\n\tif f=0 : return ; \u30e6\u30cb\u30c3\u30c8\u3044\u3063\u3071\u3044\r\n\r\n\r\n\tif smonf=1 : cn=136 ; \u30b4\u30fc\u30ec\u30e0\r\n\tif smonf=2 : cn=169 ; \u30a6\u30a3\u30b9\u30d7\r\n\tif smonf=3 or smonf=5 {\r\n\t\tr=rnd(3)\r\n\t\t if r=0 : cn=184 ; \u30be\u30f3\u30d3\r\n\t\t if r=1 : cn=185 ; \u30b0\u30fc\u30eb\r\n\t\t if r=2 : cn=186 ; \u30b9\u30b1\u30eb\u30c8\u30f3\r\n\t}\r\n\tif smonf=4{\r\n\t\tr=rnd(3)\r\n\t\t if r=0 : cn=187 ; \u30a4\u30f3\u30d7\r\n\t\t if r=1 : cn=196 ; \u30c7\u30d3\u30eb\r\n\t\t if r=2 : cn=200 ; \u30c7\u30fc\u30e2\u30f3\r\n\t}\r\n\r\n\trepeat udb\r\n\t ud(ug2+cnt)=0 ; \u30c7\u30fc\u30bf\u30af\u30ea\u30a2\r\n\tloop\r\n\r\n\tud(ug2)=cn\t; cn\u30ad\u30e3\u30e9\u7a2e\u985e\r\n\trepeat 9,1\r\n\t ud(ug2+cnt)=cd(cnt,cn) ; \u30c7\u30fc\u30bf\r\n\tloop\r\n\trepeat 5\r\n\t ud(ug2+21+cnt)=ud(ug2+1+cnt) ; \u30b9\u30c6\u30fc\u30bf\u30b9\u30c7\u30fc\u30bf\r\n\tloop\r\n\tud(ug2+26)=ud(ug2+25) ; HP\r\n\r\n\trepeat 2 : ud(ug2+11+cnt)=ud(ug2+21) : loop ; \u653b\u9632\u5024\r\n\r\n\r\n\trepeat 3 ; \u7a7a\u304d\u6226\u95d8\u30b9\u30c6\u30fc\u30bf\u30b9\u306b\u30bb\u30c3\u30c8\r\n\t if fs=1 : bsg=cnt*bsb\r\n\t if fs=2 : bsg=(cnt+3)*bsb\r\n\t if bs(bsg)=0 : bs(bsg)=un2 : break\r\n\tloop\r\n\r\n\r\n\tif fs=1 { ; \u968a\u5217\u306b\u30bb\u30c3\u30c8\r\n\t n=ftp(fs,un) ; \u53ec\u9084\u8005\u306e\u968a\u5217\r\n\t switch n\r\n\t  case 1\r\n\t   smn=1\r\n\t   if ft1(fs1+2)&gt;0 and ud(ft1(fs1+2)*udb+26)&gt;0 : ft1(fs1+3)=ft1(fs1+2) ; \u771f\u3093\u4e2d\u306b\u8ab0\u304b\u3044\u308b\r\n\t   ft1(fs1+2)=ft1(fs1+1) ; \u4e00\u3064\u5f8c\u308d\u3078\u8a70\u3081\u308b\r\n\t  swbreak\r\n\t  case 2\r\n\t   if ft1(fs1+1)=0 or ud(ft1(fs1+1)*udb+26)&lt;=0 : smn=1 : swbreak ; \u5148\u982d\u304c\u958b\u3044\u3066\u308b\r\n\t   ft1(fs1+3)=ft1(fs1+2) : smn=2 ; \u4e00\u3064\u5f8c\u308d\u3078\u8a70\u3081\u308b\r\n\t  swbreak\r\n\t  case 3\r\n\t   smn=2\r\n\t   if ft1(fs1+2)=0 or ud(ft1(fs1+2)*udb+26)&lt;=0 : swbreak ; \u771f\u3093\u4e2d\u304c\u958b\u3044\u3066\u308b\u5834\u5408\r\n\t   ft1(fs1+1)=ft1(fs1+2) : ft1(fs1+2)=0 ; \u4e00\u3064\u524d\u3078\u8a70\u3081\u308b\r\n\t  swbreak\r\n\t swend\r\n\t ft1(fs1+smn)=0\r\n\t  if smonf=5 : bts 102 : else : bts smone\r\n\t   bw 17\r\n\t ft1(fs1+smn)=un2 : bw 3 ; \u53ec\u9084\r\n\t}\r\n\r\n\tif fs=2 {\r\n\t n=ftp(fs,un) ; \u53ec\u9084\u8005\u306e\u968a\u5217\r\n\t switch n\r\n\t  case 1\r\n\t   smn=1\r\n\t   if ft2(fs2+2)&gt;0 and ud(ft2(fs2+2)*udb+26)&gt;0 : ft2(fs2+3)=ft2(fs2+2) ; \u771f\u3093\u4e2d\u306b\u8ab0\u304b\u3044\u308b\r\n\t   ft2(fs2+2)=ft2(fs2+1) ; \u4e00\u3064\u5f8c\u308d\u3078\u8a70\u3081\u308b\r\n\t  swbreak\r\n\t  case 2\r\n\t   if ft2(fs2+1)=0 or ud(ft2(fs2+1)*udb+26)&lt;=0 : smn=1 : swbreak ; \u5148\u982d\u304c\u958b\u3044\u3066\u308b\r\n\t   ft2(fs2+3)=ft2(fs2+2) : smn=2 ; \u4e00\u3064\u5f8c\u308d\u3078\u8a70\u3081\u308b\r\n\t  swbreak\r\n\t  case 3\r\n\t   smn=2\r\n\t   if ft2(fs2+2)=0 or ud(ft2(fs2+2)*udb+26)&lt;=0 : swbreak ; \u771f\u3093\u4e2d\u304c\u958b\u3044\u3066\u308b\u5834\u5408\r\n\t   ft2(fs2+1)=ft2(fs2+2) : ft2(fs2+2)=0 ; \u4e00\u3064\u524d\u3078\u8a70\u3081\u308b\r\n\t  swbreak\r\n\t swend\r\n\t if smonf=5 : bts 102 : else : bts smone\r\n\t  bw 15\r\n\t ft2(fs2+smn)=un2 ; \u53ec\u9084\r\n\t  bw 5\r\n\t}\r\n\r\n\trepeat 6\r\n\t if smnfn(cnt)=0 : smnfn(cnt)=un2 : break; \u53ec\u9084un\u683c\u7d0d\r\n\tloop\r\n\r\n\treturn\r\n\r\n\r\n#deffunc suck ; \u5438\u8840\r\n\r\n\trang fs,1 : if rangf=0 : return ; \u5c04\u7a0b\u5916\r\n\r\n\tr1=rnd(ud(ug+22)\/3+1) ; \u9b54\u529b\u88dc\u6574\u3001\u81ea\r\n\r\n\tn=ud(eg+22)\/3+ud(eg+35)+1\r\n\t if ud(eg+7)=5 : n=n*120\/100 ; \u5149\u7a2e\u65cf\u306a\u3089\u62b5\u629720%up\r\n\t  r2=rnd(n) ; \u9b54\u529b\u88dc\u6574\u3001\u6575\r\n\r\n\tsuckn=ud(ug+9)+r1-r2 : if suckn&lt;=0 : suckn=0 ; \u5438\u8840\u5024\r\n\r\n\tn1=ud(ug+25)-ud(ug+26)\r\n\tif n1&lt;=ud(eg+26) : n2=n1 : else : n2=ud(eg+26) ; \u4e0a\u9650\r\n\tif suckn&gt;n2 : suckn=n2 ; \u5438\u8840\u5024\u3092\u4e0a\u9650\u306b\u30bb\u30c3\u30c8\r\n\r\n\tud(ug+26)+=suckn ; \u81eaHP+\r\n\tud(eg+26)-=suckn ; \u6575HP-\r\n\r\n\tif fs=1 : dmp_set suckn,ut,3 : dmp_set suckn,3+et,1 ; \u30c0\u30e1\u30fc\u30b8\u8868\u793a\r\n\tif fs=2 : dmp_set suckn,3+ut,3 : dmp_set suckn,et,1\r\n\r\n\treturn\r\n\r\n\r\n\r\n#defcfunc zk_syo int zksf ; \u5c5e\u6027\u88dc\u6574 --------------------------------\r\n\r\n\tzksn=0 ; \u7a2e\u65cf\u88dc\u6574 -------\r\n\tif zksf=1 { ; \u706b\r\n\t\tif ud(eg+7)=4 or ud(eg+7)=5 : zksn=20\t; +20%\r\n\t\tif ud(eg+7)=2 or ud(eg+7)=6 : zksn=-20\t; -20%\r\n\t}\r\n\tif zksf=2 { ; \u6c34\r\n\t\tif ud(eg+7)=1 or ud(eg+7)=5 : zksn=20\t; +20%\r\n\t\tif ud(eg+7)=3 or ud(eg+7)=6 : zksn=-20\t; -20%\r\n\t}\r\n\tif zksf=3 { ; \u98a8\r\n\t\tif ud(eg+7)=2 or ud(eg+7)=5 : zksn=20\t; +20%\r\n\t\tif ud(eg+7)=4 or ud(eg+7)=6 : zksn=-20\t; -20%\r\n\t}\r\n\tif zksf=4 { ; \u5730\r\n\t\tif ud(eg+7)=3 or ud(eg+7)=5 : zksn=20\t; +20%\r\n\t\tif ud(eg+7)=1 or ud(eg+7)=6 : zksn=-20\t; -20%\r\n\t}\r\n\tif zksf=5 { ; \u5149\r\n\t\tif 1&lt;=ud(eg+7) and ud(eg+7)&lt;=4 : zksn=-20 ; 4\u5c5e\r\n\t\tif ud(eg+7)=6 : zksn=20 ; \u95c7\r\n\t}\r\n\tif zksf=6 { ; \u95c7\r\n\t\tif 1&lt;=ud(eg+7) and ud(eg+7)&lt;=4 : zksn=20 ; 4\u5c5e\r\n\t\tif ud(eg+7)=5 : zksn=-20 ; \u5149\r\n\t}\r\n\r\nzputn(0)=zksn\r\n\r\n\treturn zksn\r\n\r\n\r\n#defcfunc zk2_syo int zk2sf,int zk2sn\r\n; \u7279\u6b8a\u306e\u30a2\u30a4\u30c6\u30e0\u5c5e\u6027\u88dc\u6574(zk2sf=0 \u5168\u5c5e\u6027\u30011\uff5e\uff16 \u5404\u5c5e\u6027) -------\r\n\r\n\tzk2sg=0 : k1=120 : k2=80 ; \u30a2\u30a4\u30c6\u30e0\u88dc\u6574 -------\r\n\tn=0 : nn=0\r\n\r\n\tbsg=bsp(un) ; \u6226\u95d8\u30b9\u30c6\u30fc\u30bf\u30b9No.\r\n\r\n\tif zk2sf=0 or zk2sf=1 {\t; \u706b ----------------------------------------\r\n\t n2=zk2sn+ud(ug+31)\r\n\t  if zk2sf=0 : bsg=bsp(un) : n2+=bs(bsg+7) ; \u30a8\u30f3\u30c1\u30e3\u30f3\u30c8+\r\n\r\n\t n3=0\r\n\t  bsg=bsp(en) : n3-=bs(bsg+18) ; \u30a6\u30a9\u30fc\u30bf\u30fc\u30b9\u30af\u30ea\u30fc\u30f3-\r\n\r\n\t n=n2+n3-ud(eg+32)+ud(eg+34)-ud(eg+36)+ud(eg+35) ; \u706b\u5024-\u6c34+\u5730-\u95c7+\u5149\r\n\t  if n&gt;n2 : n=n2\t\t\t; \u6700\u5927\u5024\r\n\t  if n&lt;0 and n&lt;n2 : n=-n2\t; \u6700\u5c0f\u5024\r\n\r\n\t if ud(eg+7)=4 or ud(eg+7)=5 { ; \u5730\u3001\u5149\u3002+%\r\n\t\tif n&gt;0 : n=n*k1\/100 : else : n=n*k2\/100\r\n\t }\r\n\t if ud(eg+7)=2 or ud(eg+7)=6 { ; \u6c34\u3001\u95c7\u3002-%\r\n\t\tif n&gt;0 : n=n*k2\/100 : else : n=n*k1\/100\r\n\t }\r\n\t zk2sg+=n\r\n\r\n\t if n&gt;0 : bsg=bsp(en) : bs(bsg+1)+=n\/3  ; \u706b\u50b7\r\n\t}\r\n\r\n\tif zk2sf=0 or zk2sf=2 {\t; \u6c34 --------------------------------------\r\n\t n2=zk2sn+ud(ug+32)\r\n\t  if zk2sf=0 : bsg=bsp(un) : n2+=bs(bsg+8) ; \u30a8\u30f3\u30c1\u30e3\u30f3\u30c8+\r\n\t n=zk2sn+ud(ug+32)-ud(eg+33)+ud(eg+31)-ud(eg+36)+ud(eg+35) ; \u6c34\u5024-\u98a8+\u706b-\u95c7+\u5149\r\n\t  if n&gt;n2 : n=n2\t\t\t; \u6700\u5927\u5024\r\n\t  if n&lt;0 and n&lt;n2 : n=-n2\t; \u6700\u5c0f\u5024\r\n\r\n\t if ud(eg+7)=1 or ud(eg+7)=5 { ; \u706b\u3001\u5149\u3002+%\r\n\t\tif n&gt;0 : n=n*k1\/100 : else : n=n*k2\/100\r\n\t }\r\n\t if ud(eg+7)=3 or ud(eg+7)=6 { ; \u98a8\u3001\u95c7\u3002-%\r\n\t\tif n&gt;0 : n=n*k2\/100 : else : n=n*k1\/100\r\n\t }\r\n\t zk2sg+=n\r\n\r\n\t if n&gt;0 : bsg=bsp(en) : bs(bsg+2)+=n\/2  ; \u30b3\u30fc\u30eb\u30c9\r\n\t}\r\n\r\n\tif zk2sf=0 or zk2sf=3 {\t; \u98a8 -----------------------------------\r\n\t n2=zk2sn+ud(ug+33) : mahif=0\r\n\t  if zk2sf=0 {\r\n\t\t\tbsg=bsp(un)\r\n\t\t\t n2+=bs(bsg+9)\t; \u30a8\u30f3\u30c1\u30e3\u30f3\u30c8+\r\n\t\t\t n2+=bs(bsg+10) : mahif=1 ; \u30a8\u30f3\u30c1\u30e3\u30f3\u30c8+\r\n\t  }\r\n\r\n\t n3=0\r\n\t  bsg=bsp(en) : n3+=bs(bsg+18) ; \u30a6\u30a9\u30fc\u30bf\u30fc\u30b9\u30af\u30ea\u30fc\u30f3+\r\n\r\n\t n=zk2sn+n3+ud(ug+33)-ud(eg+34)+ud(eg+32)-ud(eg+36)+ud(eg+35) ; \u98a8\u5024-\u5730+\u6c34-\u95c7+\u5149\r\n\t  if n&gt;n2 : n=n2\t\t\t; \u6700\u5927\u5024\r\n\t  if n&lt;0 and n&lt;n2 : n=-n2\t; \u6700\u5c0f\u5024\r\n\r\n\t if ud(eg+7)=2 or ud(eg+7)=5 { ; \u6c34\u3001\u5149\u3002+%\r\n\t\tif n&gt;0 : n=n*k1\/100 : else : n=n*k2\/100\r\n\t }\r\n\t if ud(eg+7)=4 or ud(eg+7)=6 { ; \u5730\u3001\u95c7\u3002-%\r\n\t\tif n&gt;0 : n=n*k2\/100 : else : n=n*k1\/100\r\n\t }\r\n\t zk2sg+=n\r\n\r\n\t if mahif=1 or itn=283 or itn=288 { ; \u9ebb\u75fa\r\n\t\tr1=0 : r2=0\r\n\t\trepeat 2\r\n\t\t r1+=rnd(ud(eg+22)+1)\t; \u9b54\u529b\u62b5\u6297\u5024\r\n\t\t r2+=rnd(n+1)\t\t\t; \u9ebb\u75fa\u5024\r\n\t\tloop\r\n\t\tif r1&lt;r2 : bs(bsg+3)+=n\r\n\t }\r\n\t}\r\n\r\n\tif zk2sf=0 or zk2sf=4 { ; \u5730\r\n\t n2=zk2sn+ud(ug+34)\r\n\t \r\n\t  if zk2sf=0 : bsg=bsp(un) : n2+=bs(bsg+11) ; \u30a8\u30f3\u30c1\u30e3\u30f3\u30c8+\r\n\t n=n2-ud(eg+31)+ud(eg+33)-ud(eg+36)+ud(eg+35) ; \u5730\u5024-\u706b+\u98a8-\u95c7+\u5149\r\n\t  if n&gt;n2 : n=n2\t; \u6700\u5927\u5024\r\n\t  if n&lt;0 and n&lt;n2 : n=-n2\t; \u6700\u5c0f\u5024\r\n\r\n\t\tif ud(eg+7)=3 or ud(eg+7)=5 { ; \u98a8\u3001\u5149\u3002+%\r\n\t\t\tif n&gt;0 : n=n*k1\/100 : else : n=n*k2\/100\r\n\t\t}\r\n\t\tif ud(eg+7)=1 or ud(eg+7)=6 { ; \u706b\u3001\u95c7\u3002-%\r\n\t\t\tif n&gt;0 : n=n*k2\/100 : else : n=n*k1\/100\r\n\t\t}\r\n\t\tzk2sg+=n\r\n\r\n\t\tr1=0 : r2=0 : bsg=bsp(en) ; \u6c17\u7d76\r\n\t\trepeat 2\r\n\t\t r1+=rnd(ud(eg+21)+1)\t; \u7b4b\u529b\u62b5\u6297\u5024\r\n\t\t r2+=rnd(n+1)\t\t\t; \u9ebb\u75fa\u5024\r\n\t\tloop\r\n\t\tif r1&lt;r2 : bs(bsg+4)+=n\r\n\t}\r\n\r\n\tif zk2sf=0 or zk2sf=5 { ; \u5149\r\n\t n=0 : nn=0\r\n\t repeat 4\r\n\t  if ud(eg+31+cnt)&gt;0 : n+=ud(eg+31+cnt)\r\n\t loop\r\n\t n2=zk2sn+ud(ug+35)\r\n\t  if zk2sf=0 : bsg=bsp(un) : n2+=bs(bsg+12) ; \u30a8\u30f3\u30c1\u30e3\u30f3\u30c8+\r\n\r\n\t n3=0\r\n\t  bsg=bsp(en) : n3-=bs(bsg+18) ; \u30a6\u30a9\u30fc\u30bf\u30fc\u30b9\u30af\u30ea\u30fc\u30f3-\r\n\r\n\t nn=n2-n+n3+ud(eg+36)\r\n\t  if nn&gt;n2 : nn=n2\t; \u6700\u5927\u5024\r\n\t  if nn&lt;0 and nn&lt;n2 : nn=-n2\t; \u6700\u5c0f\u5024\r\n\r\n\t if 1&lt;=ud(eg+7) and ud(eg+7)&lt;=4 { ; 4\u5c5e\u3001+%\r\n\t\tif nn&gt;0 : nn=nn*k2\/100 : else : nn=nn*k1\/100\r\n\t }\r\n\t if ud(eg+7)=6 { ; \u95c7\u3001-%\r\n\t\tif nn&gt;0 : nn=nn*k1\/100 : else : nn=nn*k2\/100\r\n\t }\r\n\t zk2sg+=nn\r\n\r\n\t}\r\n\r\n\tif zk2sf=0 or zk2sf=6 { ; \u95c7\r\n\t n=0 : nn=0\r\n\t repeat 4\r\n\t  if ud(eg+31+cnt)&gt;0 : n+=ud(eg+31+cnt)\r\n\t loop\r\n\t n2=zk2sn+ud(ug+36)\r\n\t  if zk2sf=0 : bsg=bsp(un) : n2+=bs(bsg+13) ; \u30a8\u30f3\u30c1\u30e3\u30f3\u30c8+\r\n\r\n\t n3=0\r\n\t  bsg=bsp(en) : n3+=bs(bsg+18) ; \u30a6\u30a9\u30fc\u30bf\u30fc\u30b9\u30af\u30ea\u30fc\u30f3-\r\n\r\n\t nn=n2+n+n3-ud(eg+35)\r\n\t  if nn&gt;n2 : nn=n2\t; \u6700\u5927\u5024\r\n\t  if nn&lt;0 and nn&lt;n2 : nn=-n2\t; \u6700\u5c0f\u5024\r\n\r\n\t if 1&lt;=ud(eg+7) and ud(eg+7)&lt;=4 { ; 4\u5c5e\u3001+%\r\n\t\tif nn&gt;0 : nn=nn*k1\/100 : else : nn=nn*k2\/100\r\n\t }\r\n\t if ud(eg+7)=5 { ; \u5149\u3001-%\r\n\t\tif nn&gt;0 : nn=nn*k2\/100 : else : nn=nn*k1\/100\r\n\t }\r\n\t zk2sg+=nn\r\n\t}\r\n\r\n\treturn zk2sg\r\n\r\n\r\n\r\n#deffunc dmg int dmgf,int dmgn ; \u30c0\u30e1\u30fc\u30b8\u51e6\u7406\uff08\u653b\u6483\u7a2e\u985e\u3001\u5024\uff09; -------------------\r\n\r\n; \u30c0\u30e1\u30fc\u30b8\u8a08\u7b97 ---------------------------------\r\n\r\n\tbsg=bsp(un) ; \u6226\u95d8\u30b9\u30c6\u30fc\u30bf\u30b9No.\r\n\r\n\r\n\tn=0\r\n\tif fs=1 : n+=zenkou(1) ; \u81ea\u653b\u52e2\u7387\r\n\tif fs=2 : n+=zenkou(3) ; \u6575\u653b\u52e2\u7387\r\n\r\n\tatkg=(dmgn)*(gsr+zk1+n)\/100 ; \u653b\u6483\u529b\r\n\r\n\tn1=0\r\n\tif fs=1 : n1+=zenkou(2) ; \u81ea\u9632\u885b\u7387\r\n\tif fs=2 : n1+=zenkou(4) ; \u6575\u9632\u885b\u7387\r\n\r\n\r\n\tswitch dmgf\r\n\t case 1 ; \u7269\u7406\r\n\t  atn=0 : repeat 2 : atn+=rnd(atkg+1) : loop\t; \u653b\u6483\u5024\r\n\r\n\t  n2=0\r\n\t   if ud(eg+8)=21 : n2+=ud(eg+9)\t; \u30c7\u30a3\u30d5\u30a7\u30f3\u30b9\r\n\t   bsg=bsp(en) : n2+=bs(bsg+15)\t\t; \u6226\u95d8\u30b9\u30c6\u30fc\u30bf\u30b9\u3001\u9632\u5fa1\r\n\t  r=(ud(eg+12)+n2)*(100+n1)\/100+1\t; \u6575\u306e\u9632\u5fa1\u529b\r\n\t   dfn=0 : repeat 2 : dfn+=rnd(r) : loop\t\t; \u9632\u5fa1\u5024\r\n\t swbreak\r\n\t case 2 ; \u9b54\u6cd5\r\n\t  atn=0 : repeat 2 : atn+=rnd(atkg+1) : loop ; \u653b\u6483\u5024\r\n\t  r=ud(eg+22)*(100+n1)\/100+1\t; \u6575\u306e\u9b54\u529b\r\n\t   dfn=0 : repeat 2 : dfn+=rnd(r) : loop ; \u9632\u5fa1\u5024\r\n\t swbreak\r\n\t case 3 ; \u7279\u6b8a\r\n\t  atn=0\t; \u7279\u6b8a\u306e\u653b\u6483\u5024\r\n\t  dfn=0\t; \u7279\u6b8a\u306e\u5834\u5408\u9632\u5fa1\u7121\u3057\r\n\t swbreak\r\n\tswend\r\n\r\n\tdm=atn-dfn : if dm&lt;0 : dm=0 ; \u57fa\u790e\u30c0\u30e1\u30fc\u30b8\r\n\r\n\tdm=dm+(zk2*gsr\/100) ; \u30c0\u30e1\u30fc\u30b8+\u5c5e\u6027\u30c0\u30e1\u30fc\u30b8\r\n\r\n\tif dm=0 { ; miss\r\n\t\tn=dm  : cn=0\r\n\r\n\t\treturn\r\n\t}\r\n\r\n\tif dm&gt;0 and ud(ug)=154 : temp 0,ud(ug+9) ; \u30ad\u30e5\u30fc\u30d4\u30c3\u30c9\u306e\u30c1\u30e3\u30fc\u30e0\r\n\r\n\tif dm&gt;0 : n=dm  : if dmgf=3 : cn=4 : else : cn=dmgf ; \u30ab\u30e9\u30fc\r\n\tif dm&lt;0 : n=-dm : cn=3 ; \u56de\u5fa9\u30ab\u30e9\u30fc\u3001\u7dd1\r\n\tif fs=1 : dmp_set n,3+et,cn ; \u30c0\u30e1\u30fc\u30b8\u8868\u793a\r\n\tif fs=2 : dmp_set n,et,cn\r\n\r\n\tif ud(ug+8)=42 and dmgf=1 { ; \u515c\u5272\r\n\t if id(ig+19)=1 or id(ig+19)=2 or id(ig+19)=4 {; \u5263\u3001\u5927\u5263\u3001\u65a7\r\n\t  if id(ig+16)=2 { ; \u53f3\u4e21\u624b\u6301\u3061\r\n\t   r1=rnd(dm+1)\r\n\t   r2=rnd(ud(eg+26)+1)\r\n\r\n\t   if r1&gt;r2 : ud(eg+26)=0 : d_syo en : return ; \u6210\u529f\r\n\t  }\r\n\t }\r\n\t}\r\n\r\n\tud(eg+26)-=dm : if ud(eg+26)&lt;0 : ud(eg+26)=0 ; HP\u51e6\u7406\r\n\r\n\tif ud(eg+26)=0 : d_syo en : return ; \u6b7b\u4ea1\u51e6\u7406\r\n\r\n\r\n\tif ud(ug+8)=10 : bs(bsg+1)+=ud(ug+9) ; \u706b\u50b7\r\n\r\n\r\n\tcn=ud(ug) ; \u30e6\u30cb\u30c3\u30c8\u7a2e\u985e\r\n\r\n\tif cn=181 or cn=182 : bsg=bsp(en) : bs(bsg+6)+=ud(ug+9) ; \u6bd2\u30d8\u30d3\u3001\u30b5\u30bd\u30ea\u306e\u6bd2\r\n\r\n\tif cn=34 : bs(bsg+3)+=ud(ug+9)\t\t; \u30ed\u30fc\u30d1\u30fc\u9ebb\u75fa\u3001\u5fc5\u305a\u304b\u304b\u308b\r\n\tif cn=184 or cn=185 : mahi 0,3,0\t; \u30be\u30f3\u30d3\u3001\u30b0\u30fc\u30eb\u9ebb\u75fa\r\n\r\n\tif ud(ug+8)=13 : stun ud(ug+9)+dm\/8 ; \u30d9\u30a2\u30fc\u3001\u30a4\u30a8\u30c6\u30a3\u3001\u30b5\u30a4\u30af\u30ed\u30d7\u30b9\u3001\u306e\u30b9\u30bf\u30f3;\u30df\u30ce\u30bf\u30a6\u30ed\u30b9cn=118 or cn=127 or cn=133cn=203\r\n\r\n\treturn\r\n\r\n\r\n#deffunc atk_syo ;int atk_syon,int atk_syoc ; \u653b\u6483\u51e6\u7406\r\n\r\n\tzk1=zk_syo(ud(ug+7)); \u7a2e\u65cf\u5c5e\u6027\u88dc\u6574\r\n\tzk2=zk2_syo(0,0)\t; \u30a2\u30a4\u30c6\u30e0\u5c5e\u6027\u88dc\u6574\r\n\r\n\tn=0\r\n\t if ud(ug+8)=20 : n+=ud(ug+9)\t; \u30d0\u30fc\u30b5\u30fc\u30af\r\n\t bsg=bsp(un) : n+=bs(bsg+14)\t; \u6226\u95d8\u30b9\u30c6\u30fc\u30bf\u30b9\u3001\u653b\u6483\r\n\r\n\tdmg 1,atkn2+n\t\t\t\t\t; \u30c0\u30e1\u30fc\u30b8\u51e6\u7406\r\n\t if ud(eg+26)=0 : scream en,un\t; \u7d76\u53eb\u51e6\u7406\r\n\r\n\tif ud(ug+8)=14 and ud(eg+26)&gt;0 and dm&gt;0 : tad 0,ud(ug+9) ; \u30bf\u30fc\u30f3\u30a2\u30f3\u30c7\u30c3\u30c9\r\n\r\n\r\n\tif atkf2!1 : return ; \u6b66\u5668\u4ee5\u5916\u306f\u623b\u308b\r\n\t if id(ig+8)=36 and dm&gt;0 : temp 0,id(ig+9) ; \u9b45\u60d1\r\n\r\n\treturn\r\n\r\n\r\n#deffunc atk int atkf,int atkn,int atkrg\r\n; \u653b\u6483(\u30d5\u30e9\u30b0(0=\u7d20\u624b\u30011=\u6b66\u5668\u30012=\u9b45\u60d1)\u3001\u653b\u6483\u5024\u3001\u5c04\u7a0b) -------\r\n\r\n\tatkn2=atkn : atkf2=atkf ; \u653b\u6483\u51e6\u7406\u7528\u30d5\u30e9\u30b0\r\n\r\n\tswitch atkf\r\n\t case 0 ; \u7d20\u624b\r\n\t  if  us=129  or us=94\u3000: swbreak\t; \u7269\u7406\u30a2\u30bf\u30c3\u30af\u3057\u306a\u3044\r\n\t  rang fs,atkrg : if en=0 : swbreak\t; \u5c04\u7a0b\u5916\r\n\t   bts 1 : atk_syo : bw 20\t\t\t; \u8868\u793a\u3001\u653b\u6483\u51e6\u7406\r\n\t swbreak\r\n\t case 1 ; \u6b66\u5668\r\n\t  if id(ig+19)=7 or id(ig+19)=8 or id(ig+19)=9 or id(ig+19)=10 { ; \u5f13\u3001\u30dc\u30a6\u30ac\u30f3\u3001\u9283\u3001\u624b\u88cf\u5263\r\n\t   if ud(ug+8)=24 : brang atkrg : if en&gt;0 : bts 3 : atk_syo : bw 20 : swbreak\t; \u30b9\u30ca\u30a4\u30d4\u30f3\u30b0\r\n\t   if ud(ug+8)=25 : rang fs,atkrg+1 : if en&gt;0 : bts 3 : atk_syo : bw 20 : swbreak\t; \u5f37\u5f13\r\n\t   if ud(ug+8)=26 { ; \u8cab\u901a\r\n\t\trepeat 3,1 : et=cnt\r\n\t\t if atkrg&lt;(ut-1)+et : break\t\t\t\t; \u5c04\u7a0b\u5916\r\n\t\t  etf et : if en=0 : continue\t\t\t; \u968a\u5217\u306b\u3044\u306a\u3044\r\n\t\t atk_syo : gsr-=25\t\t; \u653b\u6483\u51e6\u7406\r\n\t\tloop\r\n\t\tbts 3 : bw 20\r\n\t\tswbreak\r\n\t   }\r\n\t   rang fs,atkrg : if en=0 : swbreak ; \u5c04\u7a0b\u5916\r\n\t    bts 3 : atk_syo : bw 20 ; \u6295\u5c04\u6b66\u5668\u3001\u8868\u793a\u3001\u653b\u6483\u51e6\u7406\r\n\t  }\r\n\r\n\t  rang fs,atkrg : if en=0 : swbreak\r\n\t   bts 2 : atk_syo : bw 20 ; \u8fd1\u63a5\u6b66\u5668\u3001\u8868\u793a\u3001\u653b\u6483\u51e6\u7406\r\n\t swbreak\r\n\t case 2 ; \u9b45\u60d1\r\n\t  bts 1 : atk_syo : bw 20 ; \u653b\u6483\u51e6\u7406\r\n\t swbreak\r\n\tswend\r\n\r\n\treturn\r\n\r\n\r\n#deffunc matk_syo ; \u9b54\u6cd5\u653b\u6483\u51e6\u7406\r\n\r\n\tzk1=zk_syo(ud(ug+7))\t\t; \u7a2e\u65cf\u5c5e\u6027\u88dc\u6574\r\n\tzk2=zk2_syo(mzk2,matkn2)\t; \u30a2\u30a4\u30c6\u30e0\u5c5e\u6027\u88dc\u6574\r\n\t dmg 2,ud(ug+22)\r\n\r\n\treturn\r\n\r\n\r\n#deffunc matk int matkf,int mzk,int matkn,int matkrg,int matke\r\n; \u9b54\u6cd5\u653b\u6483(\u30d5\u30e9\u30b0\u3001\u5c5e\u6027\u3001\u653b\u6483\u5024\u3001\u5c04\u7a0b\u3001\u30a8\u30d5\u30a7\u30af\u30c8) -------\r\n\r\n\tmzk2=mzk : matkn2=matkn\r\n\r\n\tswitch matkf\r\n\t case 0 ; \u624b\u524d\u306e\u4e00\u4f53 --------------\r\n\t  rang fs,matkrg : if en=0 : swbreak ; \u5c04\u7a0b\u5224\u5b9a\r\n\t   bts matke : matk_syo : bw 20\r\n\t swbreak\r\n\t case 1 ; \u5f8c\u5217\u306e\u4e00\u4f53 --------------\r\n\t  brang matkrg : if en=0 : swbreak ; \u5c04\u7a0b\u5224\u5b9a\r\n\t   bts matke : matk_syo : bw 20\r\n\t swbreak\r\n\t case 2 ; \u8cab\u901a --------------\r\n\t  n1=ut+2 : if n1&gt;matkrg : n2=matkrg : else : n2=n1 ; \u8ddd\u96e2\r\n\t  rang fs,n2 : if en=0 : swbreak ; \u5c04\u7a0b\u5224\u5b9a\r\n\t  et=n2-ut+1 ; \u6700\u5f8c\u5c3e\r\n\t  bts matke : matk_efg=efg : bwc=0 ; \u30a8\u30d5\u30a7\u30af\u30c8\u8868\u793a\r\n\r\n\t  repeat 3,1 : et=cnt\r\n\t   repeat ; \u79fb\u52d5\u30a6\u30a8\u30a4\u30c8\r\n\t    bwc+ : bw 1 : if bwc&gt;20 : break\r\n\t\tif itn=268 or itn=288 : break ; \u6d25\u6ce2\r\n\t    if fs=1 : if ef(matk_efg+6)&gt;=btlx2+btlxk*(et-1)+0 : break ; \u5bfe\u8c61\u306e\u5ea7\u6a19x\u306b\u6765\u305f\r\n\t    if fs=2 : if ef(matk_efg+6)&lt;=btlx1+btlxk*(3-ut)+0 : break\r\n\t   loop\r\n\r\n\t   if matkrg&lt;(ut-1)+et : break\t; \u5c04\u7a0b\u5916\r\n\t    etf et : if en=0 : continue\t; \u3044\u306a\u3044\r\n\t\t matk_syo : gsr-=25\t\t\t; \u5a01\u529b\u6e1b\u8870\r\n\t  loop\r\n\r\n\t  repeat ; \u6b8b\u308a\u306e\u30a8\u30d5\u30a7\u30af\u30c8\u30a6\u30a8\u30a4\u30c8\r\n\t   if bwc&gt;20 : break\r\n\t   bwc+ : bw 1\r\n\t  loop\r\n\t swbreak\r\n\t case 3 ; \u5168\u5217 --------------\r\n\t rang fs,matkrg : if en=0 : swbreak ; \u5c04\u7a0b\u5224\u5b9a\r\n\t  if itn!328 : et=2 : bts matke : et=2 ; \u30a8\u30d5\u30a7\u30af\u30c8\u8868\u793a\r\n\r\n\t  repeat matkrg-ut+1,1\r\n\t   if cnt=4 : break ; \u5c04\u7a0b\u5916\r\n\t   et=cnt : etf et : if en=0 : continue ; \u968a\u5217\u306b\u3044\u306a\u3044\r\n\t\tmatk_syo\r\n\t\tif itn=328 : bts matke ; \u30a8\u30d5\u30a7\u30af\u30c8\u8868\u793a\r\n\t  loop\r\n\t  bw 20 ; \u8868\u793a\u30a6\u30a8\u30a4\u30c8\r\n\t swbreak\r\n\t case 4 ; \u7740\u5f3e\u7bc4\u56f2\u578b --------------\r\n\t  f=0\r\n\t  repeat 3,1 ; 3\u4f53\u3044\u308b\u304b\r\n\t   etf cnt : if en=0 : f=1 : break\r\n\t  loop\r\n\t  if matkrg&lt;(ut-1)+2 : f=1 ; \u771f\u3093\u4e2d\u306b\u5c04\u7a0b\u304c\u5c4a\u304f\u304b\r\n\t  if f=0 { ; 3\u4f53\u306e\u5834\u5408\r\n\t   et=2 : bts matke : bw 10 ; \u5f3e\u9053\u30a8\u30d5\u30a7\u30af\u30c8\r\n\t   gsr=100\t; \u4e2d\u592e\r\n\t    et=2 : etf et : matk_syo : bts 90\r\n\t   gsr=75\t; \u5de6\u53f3\r\n\t    et=1 : etf et : matk_syo : bts 90\r\n\t    et=3 : etf et : matk_syo : bts 90\r\n\t     bw 10\t; \u7206\u767a\u30a6\u30a8\u30a4\u30c8\r\n\t   swbreak\r\n\t  }\r\n\t  rang fs,matkrg : if en=0 : swbreak\t\t; \u5c04\u7a0b\u5185\u306b\u6575\u304c\u3044\u306a\u304b\u3063\u305f\r\n\t   bts matke : bw 10\t\t\t\t\t; \u5f3e\u9053\u30a8\u30d5\u30a7\u30af\u30c8\r\n\t    gsr=100 : matk_syo : bts 90\t\t\t; 1\u4f53\u76ee\r\n\t  et+ : if et&gt;3 : swbreak\t\t\t\t; \u7bc4\u56f2\u5916\r\n\t   etf et : if en=0 : bw 10 : swbreak\t; 2\u4f53\u76ee\u306b\u3044\u306a\u3044\r\n\t    gsr=75 : matk_syo : bts 90 : bw 10\t; 2\u4f53\u76ee\r\n\t swbreak\r\n\t case 5 ; \u62bc\u3057\u51fa\u3057\r\n\t  rang fs,matkrg : if en=0 : swbreak ; \u5c04\u7a0b\u5224\u5b9a\r\n\t   matk_syo : bts matke : if itn=308 : bw 10 : else : bw 15\r\n\t  if et=3 : swbreak ; \u6700\u5f8c\u5217\r\n\t  if fs=1 : if fn2(et+1)=0 or ud(fn2(et+1)*udb+26)&lt;=0 : fn2(et+1)=fn2(et) : fn2(et)=0 ; \u62bc\u3057\u51fa\u3057\r\n\t  if fs=2 : if fn1(et+1)=0 or ud(fn1(et+1)*udb+26)&lt;=0 : fn1(et+1)=fn1(et) : fn1(et)=0 ; \u62bc\u3057\u51fa\u3057\r\n\t   if itn=308 : bw 10 : else : bw 5\r\n\t swbreak\r\n\t case 6 ; \u5f15\u304d\u5bc4\u305b\r\n\t  rang fs,matkrg : if en=0 : swbreak ; \u5c04\u7a0b\u5224\u5b9a\r\n\t  if et=1 : swbreak ; \u6700\u524d\u5217\r\n\t   bts matke : bw 10\r\n\t  if fs=1 : if fn2(et-1)=0 or ud(fn2(et-1)*udb+26)&lt;=0 : fn2(et-1)=fn2(et) : fn2(et)=0\r\n\t  if fs=2 : if fn1(et-1)=0 or ud(fn1(et-1)*udb+26)&lt;=0 : fn1(et-1)=fn1(et) : fn1(et)=0\r\n\t   bw 10\r\n\t swbreak\r\n\t case 7 ; \u30e9\u30f3\u30c0\u30e01\u4f53\r\n\t  if fs=1 : n=2 : else : n=1\r\n\t   en=rdp(n) : if en=0 : swbreak ; unNo.\u6c7a\u5b9a\r\n\t    eg=en*udb : matk_syo : bts matke : bw 20\r\n\t swbreak\r\n\tswend\r\n\r\n\treturn\r\n\r\n\r\n#deffunc tatk_syo ; \u9b54\u6cd5\u653b\u6483\u51e6\u7406\r\n\r\n\tzk1=0 ; \u7a2e\u65cf\u5c5e\u6027\u88dc\u6574\r\n\tzk2=zk2_syo(tzk2,tatkn2)\t; \u7279\u6b8a\u306e\u30a2\u30a4\u30c6\u30e0\u5c5e\u6027\u88dc\u6574\r\n\t dmg 3,tatkn2\r\n\r\n\treturn\r\n\r\n\r\n#deffunc tatk int tatkf,int tzk,int tatkn,int tatkrg,int tatke ; \u7279\u6b8a\u653b\u6483(\u5c5e\u6027\u3001\u653b\u6483\u5024\u3001\u5c04\u7a0b) -------\r\n\r\n\ttzk2=tzk : tatkn2=tatkn\r\n\r\n\tzk1=0 ; \u7a2e\u65cf\u5c5e\u6027\u88dc\u6574\r\n\r\n\tswitch tatkf\r\n\t case 0 ; \u624b\u524d\u306e\u4e00\u4f53 --------------\r\n\t  rang fs,tatkrg : if en=0 : swbreak ; \u5c04\u7a0b\u5185\u306b\u6575\u304c\u3044\u306a\u304b\u3063\u305f\r\n\t   tatk_syo : bts tatke : bw 20\r\n\t swbreak\r\n\t case 1 ; \u5f8c\u5217\u306e\u4e00\u4f53 --------------\r\n\t swbreak\r\n\t case 2 ; \u8cab\u901a\r\n\t  bpf=0\r\n\t  repeat 3,1 : et=cnt\r\n\t   if tatkrg&lt;(ut-1)+et : break\t\t; \u5c04\u7a0b\u5916\r\n\t   etf et : if en=0 : continue\t; \u968a\u5217\u306b\u3044\u306a\u3044\r\n\t   eg=en*udb : if ud(eg+26)&lt;=0 : continue ; HP\u304c0\r\n\t   tatk_syo\r\n\t   if ud(ug+8)=52 and dm&gt;0 : mahi 0,ud(ug+9)\/4,0\r\n\t   gsr-=25\t\t\t\t\t\t\t; \u5a01\u529b\u6e1b\u8870\r\n\t   bpf=1\r\n\t  loop\r\n\t  if bpf=0 : swbreak\t\t\t\t; \u6a19\u7684\u304c\u7121\u304b\u3063\u305f\u306e\u3067\u30a8\u30d5\u30a7\u30af\u30c8\u7121\u3057\r\n\t  bts tatke : bw 20\r\n\t swbreak\r\n\t case 3 ; \u5168\u5217 --------------\r\n\t  rang fs,tatkrg : if en=0 : swbreak ; \u5c04\u7a0b\u5224\u5b9a\r\n\r\n\t  repeat n,1\r\n\t   et=cnt : etf et : if en=0 : continue ; \u968a\u5217\u306b\u3044\u306a\u3044\r\n\t   eg=en*udb : if ud(eg+26)&lt;=0 : continue ; HP\u304c0\r\n\t   tatk_syo\r\n\t  loop\r\n\r\n\t  et=2\r\n\t  repeat 1 ; \u30a8\u30d5\u30a7\u30af\u30c8\u8868\u793a\r\n\t   if ud(ug+8)!64 : bts tatke : break\r\n\t   repeat 3,1\r\n\t    et=cnt : bts tatke ; \u30c0\u30fc\u30af\u30b9\u30d5\u30a1\u30a4\u30a2\r\n\t   loop\r\n\t  loop\r\n\t  bw 20 ; \u8868\u793a\u30a6\u30a8\u30a4\u30c8\r\n\t swbreak\r\n\t case 4 ; \u7740\u5f3e\u7bc4\u56f2\u578b --------------\r\n\t  f=0\r\n\t  repeat 3,1 ; 3\u4f53\u3044\u308b\u304b\r\n\t   etf cnt : if en=0 : f=1 : break\r\n\t  loop\r\n\t  if tatkrg&lt;(ut-1)+2 : f=1 ; \u771f\u3093\u4e2d\u306b\u5c04\u7a0b\u304c\u5c4a\u304f\u304b\r\n\t  if f=0 { ; 3\u4f53\u306e\u5834\u5408\r\n\t   et=2 : bts 114 : bw 10 ; \u5f3e\u9053\u30a8\u30d5\u30a7\u30af\u30c8\r\n\t   gsr=100\t; \u4e2d\u592e\r\n\t    et=2 : etf et : tatk_syo : bts 113\r\n\t   gsr=75\t; \u5de6\u53f3\r\n\t    et=1 : etf et : tatk_syo : bts 113\r\n\t    et=3 : etf et : tatk_syo : bts 113\r\n\t     bw 10\t; \u7206\u767a\u30a6\u30a8\u30a4\u30c8\r\n\t   swbreak\r\n\t  }\r\n\t  rang fs,tatkrg : if en=0 : swbreak ; \u5c04\u7a0b\u5185\u306b\u6575\u304c\u3044\u306a\u304b\u3063\u305f\r\n\t   bts 114 : bw 10 ; \u5f3e\u9053\u30a8\u30d5\u30a7\u30af\u30c8\r\n\r\n\t   tatk_syo : bts 113; 1\u4f53\u76ee\r\n\t   et+ : etf et : if en=0 : bw 10 : swbreak ; 2\u4f53\u76ee\u306b\u3044\u306a\u3044\r\n\t   gsr=75 : tatk_syo : bts 113 ; 2\u4f53\u76ee\r\n\t   bw 10 ; \u7206\u767a\u30a6\u30a8\u30a4\u30c8\r\n\t swbreak\r\n\t case 5 ; \u5486\u54ee\r\n\t  repeat 3,1\r\n\t   et=cnt : etf et : if en=0 : continue ; \u968a\u5217\u306b\u3044\u306a\u3044\r\n\t   stun ud(ug+21)\/5;+ud(ug+9)\r\n\t  loop\r\n\t  bts 108 : bw 20\r\n\t swbreak\r\n\t case 6 ; \u30db\u30fc\u30ea\u30fc\u30d6\u30ec\u30b9\r\n\t  repeat 3,1 : et=cnt\r\n\t   if tatkrg&lt;(ut-1)+et : break\t; \u5c04\u7a0b\u5916\r\n\t   etf et : if en=0 or ud(eg+7)!6 : continue ; \u968a\u5217\u306b\u3044\u306a\u3044\u3001\u95c7\u3067\u306f\u7121\u3044\r\n\t   tatk_syo\r\n\t    tad 0,ud(eg+9)\t\t\t\t; \u30bf\u30fc\u30f3\u30a2\u30f3\u30c7\u30c3\u30c9\r\n\t     gsr-=25\t\t\t\t\t; \u5a01\u529b\u6e1b\u8870\r\n\t  loop\r\n\t  bts tatke : bw 20\r\n\t swbreak\r\n\t case 7 ; \u30e9\u30f3\u30c0\u30e01\u4f53\r\n\t  if fs=1 : n=2 : else : n=1\r\n\t   en=rdp(n) : if en=0 : swbreak ; unNo.\u6c7a\u5b9a\r\n\t    eg=en*udb : tatk_syo\r\n\t     bts tatke : bw 20\r\n\t swbreak\r\n\t case 8 ; \u30dd\u30a4\u30ba\u30f3\u30d6\u30ec\u30b9\r\n\t  repeat 3,1 : et=cnt\r\n\t   if tatkrg&lt;(ut-1)+et : break\t; \u5c04\u7a0b\u5916\r\n\t    etf et : if en=0 : continue\t; \u968a\u5217\u306b\u3044\u306a\u3044\r\n\t     poi 0,tatkn,0\r\n\t  loop\r\n\t  bts tatke : bw 20\r\n\t swbreak\r\n\tswend\r\n\r\n\treturn\r\n\r\n\r\n#deffunc temp_atk ; \u9b45\u60d1\u72b6\u614b\u306e\u884c\u52d5\r\n\r\n\tr=rnd(2) : if r=0 : return ; \u4f55\u3082\u3057\u306a\u3044\r\n\r\n\tif fs=1 { ; \u5473\u65b9\u3078\u306e\u653b\u6483\r\n\t\tfs=2\r\n\t\tif ut=1 or ut=3 : if ft1(fs1+2)&gt;0 : et=2 : en=ft1(fs1+2) : eg=en*udb : atk 2,ud(ug+11),0 : return ; \u968a\u52171\u756a\u76ee\r\n\t\tif ut=2 {\r\n\t\t\tif ft1(fs1+1)&gt;0 and ft1(fs1+3)&gt;0 {\r\n\t\t\t\tr=rnd(2) : if r=0 : en=ft1(fs1+1) : et=1 : else : en=ft1(fs1+3) : et=3\r\n\t\t\t\teg=en*udb : atk 2,ud(ug+11),0 : return\r\n\t\t\t}\r\n\t\t\tif ft1(fs1+1)&gt;0 : en=ft1(fs1+1) : eg=en*udb : et=1 : atk 2,ud(ug+11),0 : return\r\n\t\t\tif ft1(fs1+3)&gt;0 : en=ft1(fs1+3) : eg=en*udb : et=3 : atk 2,ud(ug+11),0 : return\r\n\t\t}\r\n\t}\r\n\r\n\tif fs=2 { ; \u5473\u65b9\u3078\u306e\u653b\u6483\r\n\t\tfs=1\r\n\t\tif ut=1 or ut=3 : if ft2(fs2+2)&gt;0 : et=2 : en=ft2(fs2+2) : eg=en*udb : atk 2,ud(ug+11),0 : return ; \u968a\u52171\u756a\u76ee\r\n\t\tif ut=2 {\r\n\t\t\tif ft2(fs2+1)&gt;0 and ft2(fs2+3)&gt;0 {\r\n\t\t\t\tr=rnd(2) : if r=0 : et=1 : en=ft2(fs2+1) : else : et=3 : en=ft2(fs2+3)\r\n\t\t\t\teg=en*udb : atk 2,ud(ug+11),0 : return\r\n\t\t\t}\r\n\t\t\tif ft2(fs2+1)&gt;0 : en=ft2(fs2+1) : et=1 : eg=en*udb : atk 2,ud(ug+11),0 : return\r\n\t\t\tif ft2(fs2+3)&gt;0 : en=ft2(fs2+3) : et=3 : eg=en*udb : atk 2,ud(ug+11),0 : return\r\n\t\t}\r\n\t}\r\n\r\n\treturn\r\n\r\n\r\n*atack ; \u653b\u6483\u51e6\u7406 ----------------------------------------------------\r\n\r\n\ten=0\t; \u6575\u30e6\u30cb\u30c3\u30c8No.\r\n\titn=0\t; \u30a2\u30a4\u30c6\u30e0No.\r\n\r\n\tmho=ud(un*udb+22)\/5 ; \u9b54\u529b\u88dc\u6574\r\n\r\n\r\n; \u30e6\u30cb\u30c3\u30c8\u7279\u6b8a\u3001\u9b54\u6cd5\r\n\r\n\tbsg=bsp(un)\r\n\t if bs(bsg+3)&gt;0 : bts 91 : bw 20 : dgs \"\u9ebb\u75fa \",a,12 : \/*bpk*\/ : return\t; \u9ebb\u75fa\u306b\u3088\u308a\u884c\u52d5\u4e0d\u80fd\r\n\t if bs(bsg+4)&gt;0 : bts 92 : bw 20 : dgs \"\u30b9\u30bf\u30f3 \",a,12 : \/*bpk*\/ : return\t; \u6c17\u7d76\u306b\u3088\u308a\u884c\u52d5\u4e0d\u80fd\r\n\r\n\tgsr=100 ; \u653b\u6483\u6e1b\u8870\u7387\r\n\r\n\t if bs(bsg+5)&gt;0 : bts 93 : dgs \"\u9b45\u60d1 \",a,12 : \/*bpk*\/ : temp_atk : \/*bpk*\/ : return ; \u9b45\u60d1\u6642\u306e\u884c\u52d5\r\n\r\n\r\n\tif ud(ug+8)=16 : if ud(ug)=195 or ud(ug)=201 : bpn=30 : temp 1,ud(ug+9) ; \u9b45\u60d1\u306e\u77b3\r\n\tif ud(ug+8)=31 : bpn=31 : smon 5\t\t\t\t; \u30cd\u30af\u30ed\u30de\u30f3\u30b5\u30fc\r\n\tif ud(ug+8)=32 : bpn=32 : suck : bts 103 : bw 20\t; \u5438\u8840\r\n\tif ud(ug+8)=35 {\t\t\t\t\t\t\t\t; \u30ca\u30a4\u30c8\u30e1\u30a2\r\n\t\tbpn=35\r\n\t\ttatk 7,6,ud(ug+9),5,104\r\n\t\tmahi 0,ud(ug+9),5\r\n\t}\r\n\tif ud(ug+8)=50 : bpn=50 : tatk 2,1,ud(ug+9),3,105\t; \u30d5\u30a1\u30a4\u30e4\u30fc\u30d6\u30ec\u30b9\r\n\tif ud(ug+8)=51 : bpn=51 : tatk 2,2,ud(ug+9),3,106\t; \u30b3\u30fc\u30eb\u30c9\u30d6\u30ec\u30b9\r\n\tif ud(ug+8)=52 : bpn=52 : tatk 2,3,ud(ug+9),3,107\t; \u30b5\u30f3\u30c0\u30fc\u30d6\u30ec\u30b9\r\n\tif ud(ug+8)=53 : bpn=53 : tatk 5,0,0,0,108\t\t\t; \u5486\u54ee\r\n\tif ud(ug+8)=54 : bpn=54 : tatk 6,5,ud(ug+9),5,109\t; \u30db\u30fc\u30ea\u30fc\u30d6\u30ec\u30b9\r\n\tif ud(ug+8)=55 : bpn=55 : tatk 8,6,ud(ug+9),4,110\t; \u30dd\u30a4\u30ba\u30f3\u30d6\u30ec\u30b9\r\n\tif ud(ug+8)=56 : bpn=56 : tatk 2,2,ud(ug+9),4,111\t; \u6d25\u6ce2\r\n\r\n\tif ud(ug+8)=60 : bpn=60 : tatk 0,1,ud(ug+9),1,112\t; \u706b\u306e\u606f\r\n\tif ud(ug+8)=61 : bpn=61 : tatk 4,1,ud(ug+9),3,0\t\t; \u30d5\u30a1\u30a4\u30e4\u30fc\u30dc\u30fc\u30eb\r\n\tif ud(ug+8)=62 : bpn=62 : tatk 3,1,ud(ug+9),4,115\t; \u30d5\u30a1\u30a4\u30e4\u30fc\u30b9\u30c8\u30fc\u30e0\r\n\tif ud(ug+8)=63 : bpn=63 : tatk 3,2,ud(ug+9),5,116\t; \u30b3\u30fc\u30eb\u30c9\u30b9\u30c8\u30fc\u30e0\r\n\tif ud(ug+8)=64 : bpn=64 : tatk 3,6,ud(ug+9),5,117\t; \u30c0\u30fc\u30af\u30d5\u30ec\u30a4\u30e0\r\n\tif ud(ug+8)=65 : bpn=65 : tatk 3,3,ud(ug+9),5,118\t; \u30a6\u30a4\u30f3\u30c9\u30b9\u30c8\u30fc\u30e0\r\n\r\n\r\n; \u30a2\u30a4\u30c6\u30e0\u9b54\u6cd5 ---------------------------------------\r\n\r\n\r\n\trepeat 7 ; \u88c5\u5099\u6b04\r\n\t in=ud(ug+40+cnt) : if in&lt;=0 : continue\r\n\t  ig=in*idb : itn=id(ig)\r\n\r\n\t gsr=100 ; \u6e1b\u8870\u7387\u30ea\u30bb\u30c3\u30c8\r\n\r\n\t if itn=251 : bpn=251 : matk 0,1,id(ig+9),id(ig+17),10\t\t\t; \u30d5\u30a1\u30a4\u30e4\u30fc\r\n\t if itn=252 : bpn=252 :  enc 1,id(ig+9) \t: bts 11 : bw 20\t; \u30d5\u30a1\u30a4\u30e4\u30fc\u30a6\u30a7\u30dd\u30f3\r\n\t if itn=253 : bpn=253 :  sad 2,14,id(ig+9),12\t\t\t\t\t; \u30d0\u30fc\u30b5\u30fc\u30af\r\n\t if itn=254 : bpn=254 : matk 1,1,id(ig+9),id(ig+17),13\t\t\t; \u30d5\u30a1\u30a4\u30e4\u30fc\u30d4\u30ec\u30a4\u30e0\r\n\t if itn=255 : bpn=255 : matk 2,1,id(ig+9),id(ig+17),14\t\t\t; \u30d5\u30ec\u30a4\u30e0\u30a2\u30ed\u30fc\r\n\t if itn=256 : bpn=256 :  sad 3,14,id(ig+9),15\t\t\t\t\t; \u30d0\u30c8\u30eb\u30bd\u30f3\u30b0\r\n\t if itn=257 : bpn=257 : matk 4,1,id(ig+9),id(ig+17),16\t\t\t; \u30d5\u30a1\u30a4\u30a2\u30fc\u30dc\u30fc\u30eb\r\n\t if itn=258 : bpn=258 : matk 3,1,id(ig+9),id(ig+17),17\t\t\t; \u30d5\u30a1\u30a4\u30e4\u30fc\u30a6\u30a9\u30fc\u30eb\r\n\t if itn=259 : bpn=259 : matk 3,1,id(ig+9),id(ig+17),18\t\t\t; \u30a8\u30af\u30b9\u30d7\u30ed\u30fc\u30b8\u30e7\u30f3\r\n\r\n\t if itn=261 : bpn=261 : matk 0,2,id(ig+9),id(ig+17),20\t\t\t; \u30a2\u30a4\u30b9\u30cb\u30fc\u30c9\u30eb\r\n\t if itn=262 : bpn=262 : matk 5,2,id(ig+9),id(ig+17),21\t\t\t; \u30a6\u30a9\u30fc\u30bf\u30fc\u30b9\u30c8\u30ea\u30fc\u30e0\r\n\t if itn=263 : bpn=263 : cure 2\t\t\t\t: bts 22 : bw 20\t; \u30d4\u30e5\u30ea\u30d5\u30a1\u30a4\r\n\t if itn=264 : bpn=264 :  enc 2,id(ig+9) \t: bts 23 : bw 20\t; \u30a2\u30a4\u30b9\u30a8\u30f3\u30c1\u30e3\u30f3\u30c8\r\n\t if itn=265 : bpn=265 : matk 2,2,id(ig+9),id(ig+17),24\t\t\t; \u30a2\u30a4\u30b9\u30b8\u30e3\u30d9\u30ea\u30f3\r\n\t if itn=266 : bpn=266 : matk 1,2,id(ig+9),id(ig+17),25\t\t\t; \u30a2\u30a4\u30b9\u30d4\u30e9\u30fc\r\n\t if itn=267 : bpn=267 :  scr 2,id(ig+9) \t: bts 26 : bw 20\t; \u30a6\u30a9\u30fc\u30bf\u30fc\u30b9\u30af\u30ea\u30fc\u30f3\r\n\t if itn=268 : bpn=268 : matk 2,2,id(ig+9),id(ig+17),27\t\t\t; \u6d25\u6ce2\r\n\t if itn=269 : bpn=269 : matk 3,2,id(ig+9),id(ig+17),28\t\t\t; \u30e1\u30a4\u30eb\u30b7\u30e5\u30c8\u30ed\u30fc\u30e0\r\n\t if itn=270 : bpn=270 : matk 3,2,id(ig+9),id(ig+17),29\t\t\t; \u30d6\u30ea\u30b6\u30fc\u30c9\r\n\r\n\t if itn=281 : bpn=281 : matk 0,3,id(ig+9),id(ig+17),30\t\t\t; \u30a6\u30a4\u30f3\u30c9\u30ab\u30c3\u30bf\u30fc\r\n\t if itn=282 : bpn=282 :  sad 2,16,id(ig+9),31\t\t\t\t\t; \u30a6\u30a4\u30f3\u30c9\u30e0\u30fc\u30d6\r\n\t if itn=283 : bpn=283 : matk 7,3,id(ig+9),id(ig+17),32\t\t\t; \u30b5\u30f3\u30c0\u30fc\r\n\t if itn=284 : bpn=284 :  enc 3,id(ig+9)\t\t: bts 33 : bw 20\t; \u30a6\u30a3\u30f3\u30c9\u30a8\u30f3\u30c1\u30e3\u30f3\u30c8\r\n\t if itn=285 : bpn=285 :  enc 4,id(ig+9) \t: bts 34 : bw 20\t; \u30b5\u30f3\u30c0\u30fc\u30a6\u30a8\u30dd\u30f3\r\n\t if itn=286 : bpn=286 : temp 3,id(ig+9) \t: bts 35 : bw 20\t; \u30bb\u30a4\u30ec\u30fc\u30f3\u30dc\u30a4\u30b9\r\n\t if itn=287 : bpn=287 :  scr 3,id(ig+9) \t: bts 36 : bw 20\t; \u30a6\u30a3\u30f3\u30c9\u30a6\u30a9\u30fc\u30eb\r\n\t if itn=288 : bpn=288 : matk 2,3,id(ig+9),id(ig+17),37\t\t\t; \u30e9\u30a4\u30c8\u30cb\u30f3\u30b0\u30dc\u30eb\u30c8\r\n\t if itn=289 : bpn=289 : matk 3,3,id(ig+9),id(ig+17),38\t\t\t; \u30a6\u30a3\u30f3\u30c9\u30b9\u30c8\u30fc\u30e0\r\n\r\n\t if itn=291 : bpn=291 : cure 4\t \t\t\t: bts 40 : bw 20\t; \u30a2\u30fc\u30b9\u30ad\u30e5\u30a2\r\n\t if itn=292 : bpn=292 :  sad 1,15,id(ig+9),41\t\t\t\t\t; \u30cf\u30fc\u30c9\u30b3\u30fc\u30c6\u30a3\u30f3\u30b0\r\n\t if itn=293 : bpn=293 : heal 1,id(ig+9)\t\t: bts 42 : bw 20\t; \u30cd\u30a4\u30c1\u30e3\u30fc\u30d2\u30fc\u30eb\r\n\t if itn=294 : bpn=294 : matk 6,4,id(ig+9),5,43\t\t\t\t\t; \u30b0\u30e9\u30f4\u30a3\u30c6\u30a3\u30de\u30b0\u30cd\u30c3\u30c8\r\n\t if itn=295 : bpn=295 :  enc 5,id(ig+9)\t\t: bts 44 : bw 20\t; \u30b0\u30e9\u30d3\u30c6\u30a3\u30a6\u30a8\u30dd\u30f3\r\n\t if itn=296 : bpn=296 :  sdc 2,17,id(ig+9),45\t\t\t\t\t; \u30d0\u30a4\u30f3\u30c7\u30a3\u30f3\u30b0\u30d6\u30e9\u30f3\u30c1\r\n\t if itn=297 : bpn=297 : matk 0,4,id(ig+9),id(ig+17),46\t\t\t; \u30b9\u30c8\u30fc\u30f3\u30d6\u30e9\u30b9\u30c8\r\n\t if itn=298 : bpn=298 : smon 1,47\t\t\t\t\t\t\t\t; \u30b4\u30fc\u30ec\u30e0\u30af\u30ea\u30a8\u30a4\u30c8\r\n\t if itn=299 : bpn=299 : matk 3,4,id(ig+9),id(ig+17),48\t\t\t; \u30a2\u30fc\u30b9\u30af\u30a8\u30a4\u30af\r\n\r\n\t if itn=301 : bpn=301 : heal 1,id(ig+9)\t\t: bts 50 : bw 20\t; \u30d2\u30fc\u30eb\r\n\t if itn=302 : bpn=302 :  tad 1,id(ig+9)\t\t\t\t\t\t\t; \u30bf\u30fc\u30f3\u30a2\u30f3\u30c7\u30c3\u30c9\r\n\t if itn=303 : bpn=303 :  sad 2,16,id(ig+9),52\t\t\t\t\t; \u30d5\u30a9\u30fc\u30b9\u30bb\u30f3\u30b9\r\n\t if itn=304 : bpn=304 : cure 5\t\t\t\t: bts 53 : bw 20\t; \u30db\u30fc\u30ea\u30fc\u30e9\u30a4\u30c8\u30ad\u30e5\u30a2\r\n\t if itn=305 : bpn=305 :  enc 6,id(ig+9)\t\t: bts 54 : bw 20\t; \u30db\u30fc\u30ea\u30fc\u30a6\u30a8\u30dd\u30f3\r\n\t if itn=306 : bpn=306 :  sad 1,15,id(ig+9),55\t\t\t\t\t; \u30d7\u30ed\u30c6\u30af\u30c8\r\n\t if itn=307 : bpn=307 : matk 0,5,id(ig+9),id(ig+17),56\t\t\t; \u30ec\u30a4\u30a2\u30ed\u30fc\r\n\t if itn=308 : bpn=308 : matk 5,5,id(ig+9),id(ig+17),57\t\t\t; \u30b5\u30a4\u30ad\u30c3\u30af\u30d5\u30a9\u30fc\u30b9\r\n\t if itn=309 : bpn=309 :  sad 3,14,id(ig+9),58\t\t\t\t\t; \u30d6\u30ec\u30b9\r\n\t if itn=310 : bpn=310 :  scr 5,id(ig+9)\t\t: bts 59 : bw 20\t; \u30db\u30fc\u30ea\u30fc\u30e9\u30a4\u30c8\u30b5\u30fc\u30af\u30eb\r\n\t if itn=311 : bpn=311 : matk 0,5,id(ig+9),id(ig+17),60\t\t\t; \u30ec\u30a4\u30d6\u30ec\u30a4\u30c9\r\n\t if itn=312 : bpn=312 : heal 3,id(ig+9)\t\t: bts 61 : bw 20\t; \u30db\u30fc\u30ea\u30fc\u30e9\u30a4\u30c8\u30d2\u30fc\u30eb\r\n\t if itn=313 : bpn=313 : smon 2,62\t\t\t\t\t\t\t\t; \u30a6\u30a3\u30eb\u30fb\u30aa\u30fb\u30a6\u30a3\u30b9\u30d7\r\n\t if itn=314 : bpn=314 : resur\t\t\t\t\t\t\t\t\t; \u30ea\u30b6\u30ec\u30af\u30b7\u30e7\u30f3\r\n\r\n\t if itn=321 : bpn=321 : matk 7,6,id(ig+9),id(ig+17),70\t\t\t; \u30de\u30a4\u30f3\u30c9\u30d6\u30e9\u30b9\u30c8\r\n\t if itn=322 : bpn=322 :  poi 2,id(ig+9),id(ig+17),71\t\t\t; \u30dd\u30a4\u30ba\u30f3\r\n\t if itn=323 : bpn=323 : mahi 1,id(ig+9),id(ig+17),72\t\t\t; \u90aa\u773c\r\n\t if itn=324 : bpn=324 : temp 2,id(ig+9),73\t\t\t\t\t\t; \u30c1\u30e3\u30fc\u30e0\r\n\t if itn=325 : bpn=325 :  sdc 2,14,id(ig+9),74\t\t\t\t\t; \u30a6\u30a3\u30fc\u30af\u30cd\u30b9\r\n\t if itn=326 : bpn=326 : curse id(ig+9)\t\t\t\t\t\t\t; \u30ab\u30fc\u30b9\r\n\t if itn=327 : bpn=327 :  sdc 3,16,id(ig+9),76\t\t\t\t\t; \u30c0\u30fc\u30af\u30cd\u30b9\r\n\t if itn=328 : bpn=328 : matk 3,6,id(ig+9),id(ig+17),77\t\t\t; \u30d5\u30ec\u30a4\u30e0\u30ab\u30fc\u30b9\r\n\t if itn=329 : bpn=329 : smon 4,78\t\t\t\t\t\t\t\t; \u30c7\u30e2\u30f3\u30ba\u30b2\u30fc\u30c8\r\n\r\n\tloop ; --------------------------------------------\r\n\r\n\r\n; \u7269\u7406\u653b\u6483 --------------------------------------------\r\n\r\n\tscreamf=0\t; \u7d76\u53eb\u30d5\u30e9\u30b0\r\n\r\n\tgsr=100\t\t; \u653b\u6483\u6e1b\u8870\u7387\r\n\r\n\tn=1\r\n\tif ud(ug+8)=40 : n=2 ; 2\u56de\u653b\u6483\r\n\tif ud(ug+8)=41 : n=3 ; 3\u56de\u653b\u6483\r\n\trepeat n ;-------------------------------------------------------------\r\n\r\n\t if ud(ug+16)=0 and ut=1 : gensui=120 : atk 0,ud(ug+11),1 : bpn=5 : ;bpk; \u7d20\u30a2\u30bf\u30c3\u30af\r\n\t  if screamf=1 : break ; \u7d76\u53eb\u306b\u3088\u308a\u6b7b\u4ea1\r\n\r\n\t if ud(ug+16)=2 { ; 2\u624b ------------------------\r\n\r\n\t  repeat 1 ; \u53f3\u624b\r\n\t   if ud(ug+40)=0 { ; \u7d20\u624b\r\n\t    in=ud(ug+41) : ig=in*idb\r\n\t    if ud(ug+41)=0 or id(ig+16)=5 { ; \u5de6\u624b\u304c\u7d20\u624b\u304b\u76fe\r\n\r\n\t\t atk 0,ud(ug+11),1 : gsr=75 : break ; \u53f3\u7d20\u624b\u653b\u6483\r\n\t    }\r\n\t   }\r\n\t   if ud(ug+40)&gt;0 { ; \u53f3\u624b\u6b66\u5668\r\n\t    in=ud(ug+40) : ig=in*idb\r\n\t    atk 1,ud(ug+11)+id(ig+11),id(ig+17) ; \u53f3\u624b\u6b66\u5668\u653b\u6483\r\n\t    gsr=75\r\n\t   }\r\n\t  loop\r\n\t  if screamf=1 : break ; \u7d76\u53eb\u306b\u3088\u308a\u6b7b\u4ea1\r\n\r\n\t  repeat 1 ; \u5de6\u624b\r\n\t   if ud(ug+40)=0 and ud(ug+41)=0 : atk 0,ud(ug+11),1 : bpn=3 : \/*bpk*\/ : break ; \u7d20\u624b\u306a\u3089\u5de6\u7d20\u624b\u653b\u6483\r\n\t   if ud(ug+41)&gt;0 { ; \u5de6\u624b\u6b66\u5668\r\n\t    in=ud(ug+41) : ig=in*idb\r\n\t    atk 1,ud(ug+11)+id(ig+11),id(ig+17) ; \u5de6\u624b\u6b66\u5668\u653b\u6483\r\n\t   }\r\n\t  loop\r\n\t  if screamf=1 : break ; \u7d76\u53eb\u306b\u3088\u308a\u6b7b\u4ea1\r\n\r\n\t } ; -------------------------------------------\r\n\r\n\t if ud(ug+16)&gt;2 { ; \u8907\u6570\u624b ---------------\r\n\t  repeat ud(ug+16) ; \u624b\u6570\r\n\t   if screamf=1 : break ; \u7d76\u53eb\u306b\u3088\u308a\u6b7b\u4ea1\r\n\r\n\t   if ud(ug+40+cnt)=0 : atk 0,ud(ug+11),1 : gsr-=25 : bp 1 : \/*bpk*\/ : continue ; \u7d20\u624b\r\n\r\n\t   if ud(ug+40+cnt)&gt;0 { ; \u6b66\u5668\r\n\t    in=ud(ug+40+cnt) : ig=in*idb\r\n\t    if id(ig+16)!5 : atk 1,ud(ug+11)+id(ig+11),id(ig+17) : gsr-=25 : bp 2 :; bpk; \u76fe\u3067\u7121\u3051\u308c\u3070\u653b\u6483\r\n\t   }\r\n\t    if screamf=1 : break ; \u7d76\u53eb\u306b\u3088\u308a\u6b7b\u4ea1\r\n\t  loop\r\n\t } ; --------------------------------------\r\n\t if screamf=1 : break ; \u7d76\u53eb\u306b\u3088\u308a\u6b7b\u4ea1\r\n\tloop ; ----------------------------------------------------------------\r\n\r\n\r\n\trepeat 1 ; \u518d\u751f\r\n\t if ud(ug+8)!33 : break ; \u518d\u751f\u6301\u3063\u3066\u7121\u3044\r\n\t n2=ud(ug+25)-ud(ug+26)\t; HP\u6e1b\u3063\u305f\u5024\r\n\t  if n2=0 : break\t\t; \u6e1b\u3063\u3066\u306a\u3044\r\n\r\n\t n1=ud(ug+9)\t\t\t; \u518d\u751f\u5024\r\n\t  if n1&gt;n2 : n1=n2\t\t; \u4e0a\u9650\u30bb\u30c3\u30c8\r\n\r\n\t ud(ug+26)+=n1\t\t\t; HP+\r\n\t  if fs=1 : n=0 : else : n=3\r\n\t  dmp_set n1,n+ut,3\t\t; \u8868\u793a\r\n\t   bts 96 : bw 20\t\t; \u30a8\u30d5\u30a7\u30af\u30c8\r\n\tloop\r\n\r\n\r\n\tredraw 0\r\n\t  color 0,0,0 : boxf : color 255,255,255\r\n\t btl_put\r\n\t dmp_put\r\n\t bp bpn\r\n\t dg_put\r\n\tredraw 1\r\n\r\n\treturn\r\n\r\n\r\n*fight ; \u6226\u95d8 \/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\r\n\r\n\tbtn=0 ; \u30bf\u30fc\u30f3\r\n\r\n\tfg1=fc1\\3+1 : fs1=(fg1-1)*3 ; \u6226\u95d8\u3059\u308b\u90e8\u968a\r\n\tfg2=fc2\\3+1 : fs2=(fg2-1)*3\r\n\r\n\trepeat 3,1 ; \u6575\u30e6\u30cb\u30c3\u30c8No.\u683c\u7d0d\r\n\t fn1(cnt)=ft1(fs1+cnt)\r\n\t fn2(cnt)=ft2(fs2+cnt)\r\n\tloop\r\n\r\n\trepeat 6*bsb : bs(cnt)=0 : loop ; \u6226\u95d8\u30b9\u30c6\u30fc\u30bf\u30b9\u30ea\u30bb\u30c3\u30c8\r\n\trepeat 3 ; unNo.\u30bb\u30c3\u30c8\r\n\t bs(cnt*bsb)=fn1(cnt+1)\r\n\t bs((3+cnt)*bsb)=fn2(cnt+1)\r\n\tloop\r\n\r\n\trepeat 4,1 : zenkou(cnt)=0 : loop ; \u30ea\u30bb\u30c3\u30c8\r\n\trepeat 3,1 ; \u653b\u52e2\u3001\u9632\u885b\r\n\t un=fn1(cnt) : ug=un*udb\r\n\t  if un&gt;0 and ud(ug+26)&gt;0 {\r\n\t\tif ud(ug+8)=1 : zenkou(1)+=ud(ug+9) ; \u653b\u52e2\u5024\r\n\t\tif ud(ug+8)=2 : zenkou(2)+=ud(ug+9) ; \u9632\u885b\u5024\r\n\t }\r\n\t un=fn2(cnt) : ug=un*udb\r\n\t  if un&gt;0 and ud(ug+26)&gt;0 {\r\n\t\tif ud(ug+8)=1 : zenkou(3)+=ud(ug+9) ; \u653b\u52e2\u5024\r\n\t\tif ud(ug+8)=2 : zenkou(4)+=ud(ug+9) ; \u9632\u885b\u5024\r\n\t }\r\n\tloop\r\n\r\n\trepeat 3,1 ; \u521d\u671f\u968a\u5217un\u683c\u7d0d\r\n\t sfn(cnt)=fn1(cnt)\r\n\t sfn(3+cnt)=fn2(cnt)\r\n\tloop\r\n\r\n\r\nrepeat 3 ; 3\u56de\u6226\u95d8\r\n\r\n\tbtn+\r\n\r\n; \u30a4\u30cb\u30b7\u30a2\u30c6\u30a3\u30d6 --------------\r\n\r\n\tdim intv,6\t; \u30a4\u30cb\u30b7\u30a2\u30c6\u30a3\u30d6\u3001\u9806\u756a\r\n\tdim intvn,6\t; \u5024\r\n\r\n\trepeat 6 ; \u30ea\u30bb\u30c3\u30c8\r\n\t intv(cnt)=0\r\n\t intvn(cnt)=0\r\n\tloop\r\n\r\n\trepeat 3 : cnt2=cnt ; \u5024\u8a08\u7b97\r\n\t cn1=cnt+1\r\n\t cn2=cnt+1\r\n\r\n\t if fn1(cn1)&gt;0 { ; \u653b\u52e2\u5074\r\n\t\tun=fn1(cn1) : ug=un*udb\r\n\t \t intv(cnt)=un\r\n\r\n\t\tn=0 : bsg=bsp(un)\t; \u88dc\u6574\r\n\t\t if ud(ug+8)=22 : n+=ud(ug+9)\t; \u901f\u653b\r\n\t\t n+=bs(bsg+16)-bs(bsg+17)\t\t; \u6226\u95d8\u30b9\u30c6\u30fc\u30bf\u30b9\r\n\t\t n-=bs(bsg+2) : if n&lt;0 : n=0\t; \u30b3\u30fc\u30eb\u30c9\r\n\r\n\t\trepeat 2 : intvn(cnt2)+=rnd(ud(ug+23)+n+1)+1 : loop ; \u5024\r\n\t }\r\n\r\n\t if fn2(cn2)&gt;0 { ; \u9632\u885b\u5074\r\n\t \tintv(3+cnt)=fn2(cn2)\r\n\t\tug=fn2(cn2)*udb\r\n\t\tn=0 : if ud(ug+8)=22 : n=ud(ug+9) ; \u901f\u653b\r\n\r\n\t\tbsg=bsp(fn2(cn2)) : n+=bs(bsg+16)-bs(bsg+17) ; \u6226\u95d8\u30b9\u30c6\u30fc\u30bf\u30b9\r\n\r\n\t\trepeat 2 : intvn(3+cnt2)+=rnd(ud(ug+23)+n+1)+1 : loop ; \u5024\r\n\t }\r\n\tloop\r\n\r\n\trepeat 5 : cnt2=5-cnt ; \u30d0\u30d6\u30eb\u30bd\u30fc\u30c8\r\n\t repeat cnt2\r\n\r\n\t  n1=intv(5-cnt)\t: nd1=intvn(5-cnt)\r\n\t  n2=intv(5-cnt-1)\t: nd2=intvn(5-cnt-1)\r\n\r\n\t  if nd1&lt;=nd2 : continue\r\n\t  intv(5-cnt)=n2   : intv(5-cnt-1)=n1 ; \u5165\u308c\u66ff\u3048\r\n\t  intvn(5-cnt)=nd2 : intvn(5-cnt-1)=nd1\r\n\t loop\r\n\tloop\r\n\r\n\r\n; \u653b\u6483 --------------\r\n\r\n\trepeat 6 : intvc=cnt\r\n\t un=intv(intvc) : ug=un*udb : us=ud(ug) ; \u30e6\u30cb\u30c3\u30c8No.\r\n\t if un=0 : continue ; \u30e6\u30cb\u30c3\u30c8\u304c\u7121\u3044\r\n\t if ud(ug+26)&lt;=0 : continue ; HP\u304c0\r\n\r\n\t repeat 3,1 ; \u6575\u5473\u65b9\u8b58\u5225\r\n\t  if fn1(cnt)=un : fs=1 : break\r\n\t  if fn2(cnt)=un : fs=2 : break\r\n\t loop\r\n\r\n\t repeat 3,1 ; \u968a\u5217\u4f55\u756a\u76ee\u304b\r\n\t  if fs=1 : if fn1(cnt)=un : ut=cnt : break\r\n\t  if fs=2 : if fn2(cnt)=un : ut=cnt : break\r\n\t loop\r\n\r\n\t gosub *atack ; \u653b\u6483\u51e6\u7406\r\n\r\n\tloop\r\n\r\n\tyhf=0 : cslf=1 ; \u8868\u793a\u30d5\u30e9\u30b0\r\n\trepeat 6 ; \u706b\u50b7\r\n\t n7=bs(cnt*bsb+1)\t\t\t; \u706b\u50b7\u5024\r\n\t if n7&lt;=0 : continue\t\t; \u706b\u50b7\u7121\u3044\r\n\t un=bs(cnt*bsb) : ug=un*udb : utfss un : bts 94 : yhf=1\r\n\t  n1=ud(ug+26)\r\n\t   ud(ug+26)-=n7 : if ud(ug+26)&lt;0 : ud(ug+26)=0 ; \u30c0\u30e1\u30fc\u30b8\r\n\t    n2=ud(ug+26) : n3=n1-n2 : n4=fsp(un) : n5=ftp(n4,un)\r\n\t if n4=1 : dmp_set n3,n5,1\t; \u30c0\u30e1\u30fc\u30b8\u8868\u793a\r\n\t if n4=2 : dmp_set n3,3+n5,1\r\n\t if ud(ug+26)=0 : d_syo un : continue\t; \u6b7b\u4ea1\u51e6\u7406\r\n\t n7=n7\/2 : bs(cnt*bsb+1)=n7\t; \u534a\u6e1b\r\n\tloop\r\n\tif yhf=1 : bw 20\r\n\tcslf=0\r\n\r\n\tphf=0 : cslf=1 ; \u8868\u793a\u30d5\u30e9\u30b0\r\n\trepeat 6 ; \u6bd2\r\n\t n7=bs(cnt*bsb+6)\t\t\t; \u6bd2\u5024\r\n\t  if n7&lt;=0 : continue\t\t; \u6bd2\u7121\u3044\r\n\t un=bs(cnt*bsb) : ug=un*udb : utfss un : bts 95 : yhf=1\r\n\t  n1=ud(ug+26)\r\n\t   ud(ug+26)-=n7 : if ud(ug+26)&lt;0 : ud(ug+26)=0 ; \u30c0\u30e1\u30fc\u30b8\r\n\t    n2=ud(ug+26) : n3=n1-n2 : n4=fsp(un) : n5=ftp(n4,un)\r\n\t if n4=1 : dmp_set n3,n5,6\t\t; \u30c0\u30e1\u30fc\u30b8\u8868\u793a\r\n\t if n4=2 : dmp_set n3,3+n5,6\r\n\t if ud(ug+26)=0 : d_syo un : continue ; \u6b7b\u4ea1\u51e6\u7406\r\n\t n7=n7\/2 : bs(cnt*bsb+6)=n7\t; \u534a\u6e1b\r\n\tloop\r\n\tif phf=1 : bw 20\r\n\tcslf=0\r\n\r\n\trepeat 6*bsb ; \u9b54\u6cd5\u52b9\u679c\u534a\u6e1b\u51e6\u7406\r\n\t if cnt\\bsb=0 : continue ; un\r\n\t if cnt\\bsb=16 or cnt\\bsb=17 : continue ; \u52a0\u901f\u6e1b\u901f\u306f\u534a\u6e1b\u3055\u308c\u306a\u3044\r\n\t if cnt\\bsb=1 or cnt\\bsb=6 : continue ; \u706b\u50b7\u3001\u6bd2\u306f\u3053\u3053\u3067\u306f\u534a\u6e1b\u3055\u308c\u306a\u3044\t \r\n\t if bs(cnt)&gt;0 : bs(cnt)=bs(cnt)\/2 ; \u534a\u6e1b\r\n\tloop\r\n\r\n\trepeat 6 ; \u9ebb\u75fa\u51e6\u7406\r\n\t bsg=cnt*bsb\r\n\t  if bs(bsg)=0 : continue\r\n\t  if bs(bsg+3)=0 : continue\r\n\t un=bs(bsg) : ug=un*udb : r1=0 : r2=0\r\n\t repeat 2\r\n\t  r1+=rnd(ud(ug+22)+1)\r\n\t  r2+=rnd(bs(bsg+3)+1)\r\n\t loop\r\n\t if r1&lt;r2 : continue\r\n\t bs(bsg+3)=0 ; \u89e3\u9ebb\u75fa\r\n\tloop\r\n\r\n\trepeat 6 ; \u6c17\u7d76\u51e6\u7406\r\n\t bsg=cnt*bsb\r\n\t  if bs(bsg)=0 : continue\r\n\t  if bs(bsg+4)=0 : continue\r\n\t un=bs(bsg) : ug=un*udb : r1=0 : r2=0\r\n\t repeat 2\r\n\t  r1+=rnd(ud(ug+21)+1)\r\n\t  r2+=rnd(bs(bsg+4)+1)\r\n\t loop\r\n\t if r1&lt;r2 : continue\r\n\t bs(bsg+4)=0 ; \u89e3\u6c17\u7d76\r\n\tloop\r\n\r\n\trepeat 6 ; \u9b45\u60d1\u51e6\u7406\r\n\t bsg=cnt*bsb\r\n\t  if bs(bsg)=0 : continue\r\n\t  if bs(bsg+5)=0 : continue\r\n\t un=bs(bsg) : ug=un*udb : r1=0 : r2=0\r\n\t repeat 2\r\n\t  r1+=rnd(ud(ug+22)\/5+1)\r\n\t  r2+=rnd(bs(bsg+5)+1)\r\n\t loop\r\n\t if r1&lt;r2 : continue\r\n\t bs(bsg+5)=0 ; \u89e3\u9b45\u60d1\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\t btl_put\r\n\t dmp_put\r\n\t dg_put\r\n\tredraw 1\r\n\r\n\tfn_syo : if fn_syof=1 : break ; \u968a\u5217\u51e6\u7406\u3001\u5168\u6ec5\u3057\u305f\r\n\r\nloop\r\n\r\n\trepeat 6 ; \u53ec\u9084\u524a\u9664\r\n\t if smnfn(cnt)&gt;0 : d_syo smnfn(cnt) ; \u6b7b\u4ea1\u51e6\u7406\r\n\t smnfn(cnt)=0\r\n\tloop\r\n\r\n\trepeat 3,1 ; \u30e6\u30cb\u30c3\u30c8No.\u683c\u7d0d\r\n\t ft1(fs1+cnt)=fn1(cnt)\r\n\t ft2(fs2+cnt)=fn2(cnt)\r\n\tloop\r\n\r\n\treturn\r\n\r\n\r\n \r\n*battle ; \u6226\u95d8\u30e1\u30a4\u30f3 \/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\r\n\r\n\tbtvf=0\t; \u52dd\u5229\u30d5\u30e9\u30b0\r\n\r\n\trepeat 1 ; -------------------------------------------------\r\n\r\n\t repeat 4 : ff1(cnt)=0 : ff2(cnt)=0 : loop ; \u30ea\u30bb\u30c3\u30c8\r\n\r\n\t repeat 3 : cnt2=cnt ; \u90e8\u968a\u304c\u5b58\u5728\u3059\u308b\u304b\r\n\t  repeat 3\r\n\t   un=mu(kn1*10+cnt2*3+cnt+1)\r\n\t   if un=0 or ud(un*udb+26)&lt;=0 : continue\r\n\t   ff1(cnt2+1)=1 : ff1(0)=1 : break\r\n\t  loop\r\n\t  repeat 3\r\n\t   un=mu(kn2*10+cnt2*3+cnt+1)\r\n\t   if un=0 or ud(un*udb+26)&lt;=0 : continue\r\n\t   ff2(cnt2+1)=1 : ff2(0)=1 : break\r\n\t  loop\r\n\t loop\r\n\r\n\t if ff2(0)=0 : btvf=1 : break; \u9632\u885b\u90e8\u968a\u304c\u7121\u3044\u306e\u3067\u52dd\u5229\r\n\r\n\r\n; \u30e6\u30cb\u30c3\u30c8No.\u3072\u304b\u3048 ---------\r\n\r\n\t repeat 3 : cnt2=cnt\r\n\t  repeat 3,1\r\n\t   un=mu(kn1*10+cnt2*3+cnt)\r\n\t    if ud(un*udb+26)&gt;0 : ft1(cnt2*3+cnt)=un : else : ft1(cnt2*3+cnt)=0\r\n\t   un=mu(kn2*10+cnt2*3+cnt)\r\n\t    if ud(un*udb+26)&gt;0 : ft2(cnt2*3+cnt)=un : else : ft2(cnt2*3+cnt)=0\r\n\t  loop\r\n\t loop\r\n\r\n\r\n; \u6226\u95d8\u90e8\u968a\u5dee\u914d -------------\r\n\r\n\t fc1=0 : fc2=0 ; \u90e8\u968aNo.\r\n\r\n\t repeat 3\t; \u653b\u6483\u5074\r\n\t  if ff1(fc1\\3+1)=0 : fc1+ : continue\r\n\r\n\t  bf=0 ; \u4e0d\u6226\u52dd\u30d5\u30e9\u30b0\r\n\t  repeat 3\t; \u9632\u885b\u5074\r\n\t   if ff2(fc2\\3+1)=1 : gosub *fight : fc2+ : bf=1 : break\r\n\t   fc2+\r\n\t  loop\r\n\t  if bf=0 : btvf+ ; \u4e0d\u6226\u52dd\r\n\r\n\t  if ff1(0)=0 or ff2(0)=0 : break ; \u3069\u3061\u3089\u304b\u304c\u5168\u6ec5\u3057\u305f\r\n\r\n\t  fc1+\r\n\t loop\r\n\r\n\t if ff1(0)=0 or ff2(0)=0 : break ; \u3069\u3061\u3089\u304b\u304c\u5168\u6ec5\u3057\u305f\r\n\r\n\t repeat 3\t; \u9632\u885b\u5074\r\n\t  if fc2&gt;=3 : break ; \u5168\u90e8\u968a\u6226\u95d8\u3057\u305f\u306e\u3067\u7d42\u308f\u308a\r\n\t  if ff2(fc2\\3+1)=0 : fc2+ : continue\r\n\r\n\t  bf=0 ; \u4e0d\u6226\u8ca0\u30d5\u30e9\u30b0\r\n\t  repeat 3\t; \u653b\u6483\u5074\r\n\t   if ff1(fc1\\3+1)=1 : gosub *fight : fc1+ : bf=1 : break\r\n\t   fc1+\r\n\t  loop\r\n\t  if bf=0 : btvf- ; \u4e0d\u6226\u8ca0\r\n\r\n\t  if ff1(0)=0 or ff2(0)=0 : break ; \u5168\u6ec5\u3057\u305f\r\n\r\n\t  fc2+\r\n\t loop\r\n\r\n\tloop ;------------------------------------------------------\r\n\r\n\thextf=0\r\n\r\n;\u3000\u52dd\u6557\u51e6\u7406 ----------------\r\n\r\n\tif btvf&gt;0 { ; \u52dd\u5229\r\n\r\n\t\tmpl(kn)=1\r\n\r\n\t\tclrf=1\r\n\t\trepeat 25,1\r\n\t\t if map(cnt)=0 : continue\r\n\t\t if mpl(cnt)!1 : clrf=0 : break\r\n\t\tloop\r\n\t\tif clrf=1 : mainf=7 : kc=10 ; GAME CLEAR\r\n\t}\r\n\r\n\treturn<\/pre>\n","protected":false},"excerpt":{"rendered":"<p>2018\u5e74 3\u67082\u65e5 \u3000 \u3000 \u30003\u6708\u306b\u3001\u306a\u3063\u3066\u3057\u307e\u3063\u305f\u306a\u3041\u3002 \u30005\u6708\u304b\u3089\u59cb\u3081\u3066\u308b\u304b\u3089\u3001\u3082\u3046 1\u5e74\u306b\u306a\u3063\u3066\u3057\u307e\u3046\u3002 \u3000\u3055\u3066\u3001\u6574\u7406\u306b\u306f 1\u30f6\u6708\u7a0b\u304b\u304b\u308b\u304b\u3068\u601d\u3063\u305f\u3051\u3069\u3001\u3053\u3053\u306e\u6240\u5225\u306e\u4e8b\u3067\u30b4\u30bf\u30b4\u30bf\u3057\u3066\u6642\u9593\u3092\u53d6\u3089\u308c\u305f\u5272\u306b\u306f\u534a\u5206\u306e\u6642\u9593 &hellip; <a href=\"https:\/\/sinsei.space\/blog\/5816\" class=\"more-link\"><span class=\"screen-reader-text\">&#8220;\u6226\u95d8\u306e\u30d7\u30ed\u30b0\u30e9\u30e0\u3092\u6574\u7406\u3057\u305f&#8221; \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-5816","post","type-post","status-publish","format-standard","hentry","category-hextrategy","category-13"],"_links":{"self":[{"href":"https:\/\/sinsei.space\/blog\/wp-json\/wp\/v2\/posts\/5816","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=5816"}],"version-history":[{"count":14,"href":"https:\/\/sinsei.space\/blog\/wp-json\/wp\/v2\/posts\/5816\/revisions"}],"predecessor-version":[{"id":5830,"href":"https:\/\/sinsei.space\/blog\/wp-json\/wp\/v2\/posts\/5816\/revisions\/5830"}],"wp:attachment":[{"href":"https:\/\/sinsei.space\/blog\/wp-json\/wp\/v2\/media?parent=5816"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/sinsei.space\/blog\/wp-json\/wp\/v2\/categories?post=5816"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/sinsei.space\/blog\/wp-json\/wp\/v2\/tags?post=5816"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}