/[projet1]/public/atari/tools/rembrandt/DIVERS/EFFETS.S/LUMIERE.S
Defence Force logotype

Contents of /public/atari/tools/rembrandt/DIVERS/EFFETS.S/LUMIERE.S

Parent Directory Parent Directory | Revision Log Revision Log


Revision 67 - (show annotations)
Sat Apr 25 18:10:46 2009 UTC (10 years, 10 months ago) by dbug
File size: 794 byte(s)
Added Rembrandt and Forgotten Bits
1 *
2 *
3 * Assombrissement de l'image si le facteur est inf‚rieur … 100,
4 * ‚claircissement si il est sup‚rieur … 100.
5 *
6 facteur=20 Pourcentage de r‚duction de la luminosit‚...
7
8 move.l ‚cran,a0
9 move.l taille_image,d7
10 lsr.l d7
11 .traite_pixel_suivant
12 move (a0),d0
13
14 move d0,d2
15 and #%11111,d2 D2=bleu
16 move d0,d1
17 lsr #5,d1
18 and #%111111,d1 D1=vert
19 rol #5,d0
20 and #%11111,d0 D0=rouge
21
22 mulu #facteur,d0
23 divu #100,d0
24 cmp #31,d0
25 ble.s .ok_rouge
26 moveq #31,d0
27 .ok_rouge
28 mulu #facteur,d1
29 divu #100,d1
30 cmp #63,d1
31 ble.s .ok_vert
32 moveq #63,d1
33 .ok_vert
34 mulu #facteur,d2
35 divu #100,d2
36 cmp #31,d2
37 ble.s .ok_bleu
38 moveq #31,d2
39 .ok_bleu
40
41 ror #5,d0
42 lsl #5,d1
43 or d1,d0
44 or d2,d0
45
46 move d0,(a0)+
47 subq.l #1,d7
48 bne .traite_pixel_suivant

  ViewVC Help
Powered by ViewVC 1.1.26