| # | Line 1 | Line 1 | |
|---|---|---|
| 1 | + | { RCSid $Id$ } |
| 2 | { | |
| 3 | Compute difference between luminance of two images. | |
| 4 | Display towards red where first image is brighter, | |
| # | Line 6 | Line 7 | |
| 7 | 29 August 1991 | |
| 8 | } | |
| 9 | l1=li(1); l2=li(2); | |
| 10 | + | pos(x):if(x,x,0); |
| 11 | avg=(l1+l2)/2; | |
| 12 | dif=(l1-l2)/2; | |
| 13 | ro=avg+dif; | |
| 14 | < | go=avg-dif*dif/2; |
| 14 | > | go=pos(avg-dif*dif/2); |
| 15 | bo=avg-dif; | |
| – | Removed lines |
| + | Added lines |
| < | Changed lines |
| > | Changed lines |