hedgewars/SDLh.pas
changeset 15341 53ca3783eca3
parent 15340 4e91a7050add
child 15365 fcdb6e3a9d36
equal deleted inserted replaced
15340:4e91a7050add 15341:53ca3783eca3
   216     AMask = $FF000000;
   216     AMask = $FF000000;
   217     RShift = 0;
   217     RShift = 0;
   218     GShift = 8;
   218     GShift = 8;
   219     BShift = 16;
   219     BShift = 16;
   220     AShift = 24;
   220     AShift = 24;
   221     AByteIndex = 0;
   221     AByteIndex = 3;
   222 {$ELSE}
   222 {$ELSE}
   223     RMask = $FF000000;
   223     RMask = $FF000000;
   224     GMask = $00FF0000;
   224     GMask = $00FF0000;
   225     BMask = $0000FF00;
   225     BMask = $0000FF00;
   226     AMask = $000000FF;
   226     AMask = $000000FF;
   227     RShift = 24;
   227     RShift = 24;
   228     GShift = 16;
   228     GShift = 16;
   229     BShift = 8;
   229     BShift = 8;
   230     AShift = 0;
   230     AShift = 0;
   231     AByteIndex = 3;
   231     AByteIndex = 0;
   232 {$ENDIF}
   232 {$ENDIF}
   233 
   233 
   234     KMOD_NONE   = $0000;
   234     KMOD_NONE   = $0000;
   235     KMOD_LSHIFT = $0001;
   235     KMOD_LSHIFT = $0001;
   236     KMOD_RSHIFT = $0002;
   236     KMOD_RSHIFT = $0002;