Deprecated: The each() function is deprecated. This message will be suppressed on further calls in /home/zhenxiangba/zhenxiangba.com/public_html/phproxy-improved-master/index.php on line 456
# wat80ppc bg_rotnscl.s; wat2wasm bg_rotnscl.wat (module (import "console" "log" (func $log (param i32))) (import "js" "mem" (memory $mem 1)) # n回の呼び出し毎にデバッグ値を出力する (global $dbgcnt (mut i32) i32.push 0 ) (func $dbgval (param $val i32) global.push dbgcnt i32.push 0x3F i32.and if else # dbgcnt & 0x3F == 0 push val call log end global.push dbgcnt i32.push 1 i32.add global.pop dbgcnt ) # # 回転拡大縮小機能 # 回転位置、回転角、拡大縮小率による # (func $bg_rotnscl_ovt (export "bg_rotnscl_ovt") (param $w i32) # 生成サイズ (param $h i32) (param $c i32) # 回転中心位置 (param $r i32) (param $oc i32) # 回転オフセット位置 (param $or i32) (param $v i32) # 回転角(256:360deg.) (param $t i32) # 拡大縮小率(t/256) (local $it i32) (local $hx16 i32) # hxy: 水平方向サンプリングxy間隔 (local $hy16 i32) (local $vx16 i32) # vxy: 垂直方向サンプリングxy間隔 (local $vy16 i32) (local $_vx16 i32) # サンプリング開始位置(右下) (local $_vy16 i32) # テーブルから cos, sin を得る 0x800000 - 0x8007FF: table (cos:4 sin:4) x 256 push v i32.push 3 i32.shl # [ (v << 3) pop_push it push it # [ (v << 3) (v << 3) # hxy: 水平方向サンプリングxy間隔 i32.push 0x800000 # 0x800000 i32.add # [ (v << 3) ((v << 3) + 0x800000) i32.push 0x8007F8 i32.and # [ (v << 3) *cos(v) pop_push it push it i32.push 4 i32.add # [ (v << 3) *cos(v) *sin(v) i32.load push t i32.mul i32.push 8 i32.shr_s pop hy16 # hy16 = sin(v) * (t / 256) <16bit.16bit> i32.load push t i32.mul i32.push 8 i32.shr_s pop hx16 # hx16 = cos(v) * (t / 256) <16bit.16bit> # vxy: 垂直方向サンプリングxy間隔 i32.push 0x800200 # 0x800000 + (PI/2):64 << 3 i32.add # [ ((v << 3) + 0x800200) i32.push 0x8007F8 i32.and # [ *cos(v + 64) pop_push it push it i32.push 4 i32.add # [ *cos(v + 64) *sin(v + 64) i32.load push t i32.mul i32.push 8 i32.shr_s pop vy16 # vy16 = sin(v + 64) * (t / 256) <16bit.16bit> i32.load push t i32.mul i32.push 8 i32.shr_s pop vx16 # vx16 = cos(v + 64) * (t / 256) <16bit.16bit> # _vx16, _vy16: サンプリングxy開始点 push c push hx16 push oc i32.mul i32.sub push vx16 push or i32.mul i32.sub pop _vx16 # _vx16 = c - hx16 * oc - vx16 * or <16bit.16bit> push r push hy16 push oc i32.mul i32.sub push vy16 push or i32.mul i32.sub pop _vy16 # _vy16 = r - hy16 * oc - vy16 * or <16bit.16bit> push w push h push hx16 push hy16 push vx16 push vy16 push _vx16 push _vy16 call bg_rotnscl_ss ) # # 回転拡大縮小機能 # サンプリング開始位置とサンプリング間隔による # (func $bg_rotnscl_ss (export "bg_rotnscl_ss") (param $w i32) # 生成サイズ (param $h i32) (param $hx16 i32) # hxy: 水平方向サンプリングxy間隔 (param $hy16 i32) (param $vx16 i32) # vxy: 垂直方向サンプリングxy間隔 (param $vy16 i32) (param $_vx16 i32) # サンプリング開始位置(右下) (param $_vy16 i32) (local $_hx16 i32) # サンプリング位置カウンタ (local $_hy16 i32) (local $dest_adr i32) (local $x i32) # 描画先アドレス push w push h i32.mul i32.push 2 i32.shl pop dest_adr # dest_adr = (w * h) << 2 vloop: loop # 垂直方向ループ # 水平方向カウンタを初期化 push w pop x # x = w # サンプリング位置を垂直方向に進め、水平方向の初期位置としてセット push _vx16 push vx16 i32.add pop_push _vx16 # _vx16 += vx16 pop _hx16 # _hx16 = _vx16 push _vy16 push vy16 i32.add pop_push _vy16 # _vy16 += vy16 pop _hy16 # _hy16 = _vy16 hloop: loop # 水平方向ループ push dest_adr i32.push 4 i32.sub pop_push dest_adr # [ (dest_adr -= 4) # サンプリング位置を水平方向に進める(水平成分) push _hx16 push hx16 i32.add i32.push 0x3FFFFFF # 水平方向パターンリピート i32.and pop_push _hx16 # [ dest_adr (_hx16 += hx16) i32.push 16 i32.shr_u # [ dest_adr _hx # サンプリング位置を水平方向に進める(垂直成分) push _hy16 push hy16 i32.add i32.push 0x3FFFFFF # 垂直方向パターンリピート i32.and pop_push _hy16 # [ dest_adr _hx (_hy16 += hy16) i32.push 16 i32.shr_u i32.push 10 i32.shl # [ dest_adr _hx (_hy << 10) # サンプリングアドレス計算 i32.add i32.push 2 i32.shl # [ dest_adr (_hx + (_hy << 10)) << 2) i32.push 0x400000 i32.add # [ dest_adr src_adr # サンプリング＆描画 i32.load # [ dest_adr color i32.store # [ push x i32.push 1 i32.sub pop_push x jp_nz hloop # (x -= 1) != 0 and loop end push dest_adr jp_nz vloop # dest_adr != 0 and loop end ) ) __END__