0001: ; final.psh
0002: ;      (c) 2002 IMAGIRE Takashi
0003: 
0004: ps.1.0
0005: 
0006: def c0, 0.299f, 0.587f, 0.114f, 0.0f    ; ‹P“x‚̏d‚έ
0007: 
0008: tex t0      ; 0:1 0  1:0 1  2:0 0  3:0 0
0009: tex t1      ;   0 0    0 0    1 0    0 1
0010: tex t2
0011: tex t3
0012: 
0013: dp3 r0,      t0, c0         ;         rgb        a
0014: dp3 r0.rgb,  t1, c0         ; r0 = (t0‚Μ‹P“xAt1‚Μ‹P“x)
0015: dp3 r1,      t3, c0         ; r1 = (t3‚Μ‹P“xAt2‚Μ‹P“x)
0016: dp3 r1.rgb,  t2, c0
0017: 
0018: add_x4     r0,   r0,-r1     ; r0 =  4( t3-t0‚Μ‹P“x,     t2-t1‚Μ‹P“x)
0019: mul_x4     r0,   r0, r0     ; r0 = 64((t3-t0‚Μ‹P“x)^2, (t2-t1‚Μ‹P“x)^2)
0020: add_x4_sat r0, 1-r0,-r0.a   ; r0 = 4*(1-64((t2-t0‚Μ‹P“x)^2+(t3-t1‚Μ‹P“x)^2))
0021: mul_sat    r0, r0,   t1     ; ‹‚ί‚½ƒGƒbƒW‚ɐF‚πζ‚Ή‚ι
0022: