Changeset 37243 in project


Ignore:
Timestamp:
02/14/19 06:50:10 (5 weeks ago)
Author:
svnwiki
Message:

Anonymous wiki edit for IP [69.172.150.121]:

File:
1 edited

Legend:

Unmodified
Added
Removed
  • wiki/eggref/5/allegro

    r37242 r37243  
    33== allegro
    44
    5 This document pertains to audio related methods found in the Allegro egg.
     5This document pertains to bitmap related methods found in the Allegro egg.
    66
    77Please see the main [allegro] wiki page for more information.
     
    99[[toc:]]
    1010
    11 == Constants
    12 
    13 * audio-pan-none
    14 
    1511== Enums
    1612
    17 === audio-depth
    18 
    19 <procedure>(audio-depth->int audio-depth)</procedure>
    20 
    21 {{{audio-depth}} may be one of the following symbols:
    22 * int8
    23 * int16
    24 * int24
    25 * float32
    26 * unsigned
    27 * uint8
    28 * uint16
    29 * uint24
    30 
    31 <procedure>(int->audio-depth integer)</procedure>
    32 
    33 === channel-configuration
    34 
    35 <procedure>(channel-configuration->int channel-configuration)</procedure>
    36 
    37 {{channel-configuration}} may be one of the following symbols:
     13=== bitmap-flag
     14
     15<procedure>(bitmap-flag->int bitmap-flag)</procedure>
     16
     17{{bitmap-flag}} may be one of the following symbols:
     18* memory-bitmap
     19* keep-bitmap-format
     20* force-locking
     21* no-preserve-texture
     22* alpha-test
     23* min-linear
     24* mag-linear
     25* mipmap
     26* no-premultiplied-alpha
     27* video-bitmap
     28
     29<procedure>(int->bitmap-flag integer)</procedure>
     30
     31=== blend-operation
     32
     33<procedure>(blend-operation->int blend-operation)</procedure>
     34
     35{{blend-operation}} may be one of the following symbols:
     36* add
     37* source-minus-destination
     38* destination-minus-source
     39
     40<procedure>(int->blend-operation integer)</procedure>
     41
     42=== blending-mode
     43
     44<procedure>(blending-mode->int blending-mode)</procedure>
     45
     46{{blending-mode}} may be one of the following symbols:
     47* zero
    3848* one
    39 * two
    40 * three
    41 * four
    42 * five-one
    43 * six-one
    44 * seven-one
    45 
    46 <procedure>(int->channel-configuration integer)</procedure>
    47 
    48 === mixer-quality
    49 
    50 <procedure>(mixer-quality->int mixer-quality)</procedure>
    51 
    52 {{mixer-quality}} may be one of the following symbols:
    53 * point
    54 * linear
    55 
    56 <procedure>(int->mixer-quality integer)</procedure>
    57 
    58 === playmode
    59 
    60 <procedure>(playmode->int playmode)</procedure>
    61 
    62 {{playmode}} may be one of the following symbols:
    63 * once
    64 * loop
    65 * bidirectional
    66 
    67 <procedure>(int->playmode integer)</procedure>
     49* alpha
     50* inverse-alpha
     51
     52<procedure>(int->blending-mode integer)</procedure>
     53
     54=== blitting-flag
     55
     56<procedure>(blitting-flag->int blitting-flag)</procedure>
     57
     58{{blitting-flag}} may be one of the following symbols:
     59* flip-horizontal
     60* flip-vertical
     61
     62<procedure>(int->blitting-flag integer)</procedure>
     63
     64=== locking-flag
     65
     66<procedure>(locking-flag->int locking-flag)</procedure>
     67
     68{{locking-flag}} may be one of the following symbols:
     69* read-write
     70* read-only
     71* write-only
     72
     73<procedure>(int->locking-flag integer)</procedure>
     74
     75=== pixel-format
     76
     77<procedure>(pixel-format->int pixel-format)</procedure>
     78
     79{{pixel-format}} may be one of the following symbols:
     80* any
     81* any-no-alpha
     82* any-with-alpha
     83* any-15-no-alpha
     84* any-16-no-alpha
     85* any-16-with-alpha
     86* any-24-no-alpha
     87* any-32-no-alpha
     88* any-32-with-alpha
     89* argb-8888
     90* rgba-8888
     91* argb-4444
     92* rgb-888
     93* rgb-565
     94* rgb555
     95* rgba-5551
     96* argb-1555
     97* abgr-8888
     98* xbgr-8888
     99* bgr-888
     100* bgr-565
     101* bgr-555
     102* rgbx-8888
     103* xrgb-8888
     104* abgr-f32
     105* abgr-8888-le
     106* rgba-4444
     107
     108<procedure>(int->pixel-format integer)</procedure>
    68109
    69110== Records
    70111
    71 === audio-stream
    72 
    73 <record>audio-stream</record>
    74 
    75 === mixer
    76 
    77 <record>mixer</record>
    78 
    79 === sample
    80 
    81 <record>sample</record>
    82 
    83 === sample-id
    84 
    85 <record>sample-id</record>
    86 
    87 === sample-instance
    88 
    89 <record>sample-instance</record>
    90 
    91 === voice
    92 
    93 <record>voice</record>
     112=== bitmap
     113
     114<record>bitmap</record>
     115
     116=== locked-region
     117
     118<record>locked-region</record>
     119<procedure>(free-locked-region! locked-region)</procedure>
     120<procedure>(locked-region-data locked-region)</procedure>
     121<procedure>(locked-region-format locked-region)</procedure>
     122<procedure>(locked-region-pitch locked-region)</procedure>
     123<procedure>(locked-region-pixel-size locked-region)</procedure>
    94124
    95125== Functions
    96126
    97 === Audio
    98 
    99 <procedure>(make-sample* (blob buffer) (unsigned-integer samples) (unsigned-integer frequency) audio-depth channel-configuration (bool free-buffer))</procedure>
    100 
    101 Implements al_create_sample.
    102 
    103 <procedure>(make-sample (blob buffer) (unsigned-integer samples) (unsigned-integer frequency) audio-depth channel-configuration (bool free-buffer))</procedure>
    104 
    105 Implements al_create_sample, with (free-sample!) declared as a finalizer.
    106 
    107 <procedure>(free-sample! sample)</procedure>
    108 
    109 Implements al_destroy_sample.
    110 
    111 <procedure>(make-sample-instance* sample)</procedure>
    112 
    113 Implements al_create_sample_instance.
    114 
    115 <procedure>(make-sample-instance sample)</procedure>
    116 
    117 Implements al_create_sample_instance, with (free-sample-instance!) declared as a finalizer.
    118 
    119 <procedure>(free-sample-instance! sample)</procedure>
    120 
    121 Implements al_destroy_sample_instance.
    122 
    123 <procedure>(sample-frequency sample)</procedure>
    124 
    125 Implements al_get_sample_frequenecy.
    126 
    127 <procedure>(sample-length sample)</procedure>
    128 
    129 Implements al_get_sample_length.
    130 
    131 <procedure>(sample-depth sample)</procedure>
    132 
    133 Implements al_get_sample_depth.
    134 
    135 <procedure>(sample-channels sample)</procedure>
    136 
    137 Implements al_get_sample_channels.
    138 
    139 <procedure>(sample-instance-frequency sample-instance)</procedure>
    140 
    141 Implements al_get_sample_instance_frequency.
    142 
    143 <procedure>(sample-instance-length sample-instance)</procedure>
    144 
    145 Implements al_get_sample_instance_length.
    146 
    147 <procedure>(sample-instance-position sample-instance)</procedure>
    148 
    149 Implements al_get_sample_instance-position.
    150 
    151 <procedure>(sample-instance-speed sample-instance)</procedure>
    152 
    153 Implements al_get_sample_instance_speed.
    154 
    155 <procedure>(sample-instance-gain sample-instance)</procedure>
    156 
    157 Implements al_get_sample_instance_gain.
    158 
    159 <procedure>(sample-instance-pan sample-instance)</procedure>
    160 
    161 Implements al_get_sample_instance_pan.
    162 
    163 <procedure>(sample-instance-time sample-instance)</procedure>
    164 
    165 Implements al_get_sample_instance_time.
    166 
    167 <procedure>(sample-instance-depth sample-instance)</procedure>
    168 
    169 Implements al_get_sample_instance_depth.
    170 
    171 <procedure>(sample-instance-channels sample-instance)</procedure>
    172 
    173 Implements al_get_sample_instance_channels.
    174 
    175 <procedure>(sample-instance-playmode sample-instance)</procedure>
    176 
    177 Implements al_get_sample_instance_playmode.
    178 
    179 <procedure>(sample-instance-playing? sample-instance)</procedure>
    180 
    181 Implements al_get_sample_instance_playing.
    182 
    183 <procedure>(sample-instance-attached? sample-instance)</procedure>
    184 
    185 Implements al_get_sample_instance_attached.
    186 
    187 <procedure>(sample-instance-position-set! sample-instance unsigned-integer)</procedure>
    188 
    189 Implements al_set_sample_instance_position.
    190 
    191 <procedure>(sample-instance-length-set! sample-instance unsigned-integer)</procedure>
    192 
    193 Implements al_set_sample_instance_length.
    194 
    195 <procedure>(sample-instance-speed-set! sample-instance float)</procedure>
    196 
    197 Implements al_set_sample_instance_speed.
    198 
    199 <procedure>(sample-instance-gain-set! sample-instance float)</procedure>
    200 
    201 Implements al_set_sample_instance_gain.
    202 
    203 <procedure>(sample-instance-pan-set! sample-instance float)</procedure>
    204 
    205 Implements al_set_sample_instance_pan.
    206 
    207 <procedure>(sample-instance-playmode-set! sample-instance playmode)</procedure>
    208 
    209 Implements al_set_sample_instance_playmode.
    210 
    211 <procedure>(sample-instance-playing-set! sample-instance bool)</procedure>
    212 
    213 Implements al_set_sample_instance_playing.
    214 
    215 <procedure>(sample-instance-detach! sample-instance)</procedure>
    216 
    217 Implements al_detach_sample_instance.
    218 
    219 <procedure>(sample-instance-sample sample-instance)</procedure>
    220 
    221 Implements al_get_sample.
    222 
    223 <procedure>(sample-instance-sample-set! sample-instance sample)</procedure>
    224 
    225 Implements al_set_sample
    226 
    227 <procedure>(sample-instance-play sample-instance)</procedure>
    228 
    229 Implements al_play_sample_instance.
    230 
    231 <procedure>(sample-instance-stop sample-instance)</procedure>
    232 
    233 Implements al_stop_sample_instance.
    234 
    235 <procedure>(make-audio-stream* (integer buffer-count) (unsigned-integer samples) (unsigned-integer frequency) audio-depth channel-configuration)</procedure>
    236 
    237 Implements al_create_audio_stream.
    238 
    239 <procedure>(make-audio-stream (integer buffer-count) (unsigned-integer samples) (unsigned-integer frequency) audio-depth channel-configuration)</procedure>
    240 
    241 Implements al_create_audio_stream, with (free-audio-stream!) declared as a finalizer.
    242 
    243 <procedure>(free-audio-stream! audio-stream)</procedure>
    244 
    245 Implements al_destroy_audio_stream.
    246 
    247 <procedure>(audio-stram-drain audio-stream)</procedure>
    248 
    249 Implements al_drain_audio_stream.
    250 
    251 <procedure>(audio-stream-frequency audio-stream)</procedure>
    252 
    253 Implements al_get_audio_stream_frequency.
    254 
    255 <procedure>(audio-stream-length audio-stream)</procedure>
    256 
    257 Implements al_get_audio_stream_length.
    258 
    259 <procedure>(audio-stream-fragments audio-stream)</procedure>
    260 
    261 Implements al_get_available_audio_stream_fragments.
    262 
    263 <procedure>(audio-stream-available-fragments audio-stream)</procedure>
    264 
    265 Implements al_get_available_audio_stream_fragments.
    266 
    267 <procedure>(audio-stream-speed audio-stream)</procedure>
    268 
    269 Implements al_get_audio_stream_speed.
    270 
    271 <procedure>(audio-stream-gain audio-stream)</procedure>
    272 
    273 Implements al_get_audio_stream_gain.
    274 
    275 <procedure>(audio-stream-channels audio-stream)</procedure>
    276 
    277 Implements al_get_audio_stream_channels.
    278 
    279 <procedure>(audio-stream-depth audio-stream)</procedure>
    280 
    281 Implements al_get_audio_stream_depth.
    282 
    283 <procedure>(audio-stream-playmode audio-stream)</procedure>
    284 
    285 Implements al_get_audio_stream_playmode.
    286 
    287 <procedure>(audio-stream-playing? audio-stream)</procedure>
    288 
    289 Implements al_get_audio_stream_playing.
    290 
    291 <procedure>(audio-stream-attached? audio-stream)</procedure>
    292 
    293 Implements al_get_audio_stream_attached.
    294 
    295 <procedure>(audio-stream-fragment audio-stream)</procedure>
    296 
    297 Implements al_get_audio_stream_fragment.
    298 
    299 <procedure>(audio-stream-speed-set! audio-stream float)</procedure>
    300 
    301 Implements al_set_audio_stream_speed.
    302 
    303 <procedure>(audio-stream-gain-set! audio-stream float)</procedure>
    304 
    305 Implements al_set_audio_stream_gain.
    306 
    307 <procedure>(audio-stream-pan-set! audio-stream float)</procedure>
    308 
    309 Implements al_set_audio_stream_pan.
    310 
    311 <procedure>(audio-stream-playmode-set! audio-stream playmode)</procedure>
    312 
    313 Implements al_set_audio_stream_playmode.
    314 
    315 <procedure>(audio-stream-playing-set! audio-stream bool)</procedure>
    316 
    317 Implements al_set_audio_stream_playing.
    318 
    319 <procedure>(audio-stream-detach! audio-stream)</procedure>
    320 
    321 Implements al_detach_audio_stream.
    322 
    323 <procedure>(audio-stream-fragment-set! audio-stream c-pointer)</procedure>
    324 
    325 Implements al_set_audio_stream_fragment.
    326 
    327 <procedure>(audio-stream-rewind! audio-stream)</procedure>
    328 
    329 Implements al_rewind_audio_stream.
    330 
    331 <procedure>(audio-stream-seek-seconds! audio-stream double)</procedure>
    332 
    333 Implements al_seek_audio_stream_secs.
    334 
    335 <procedure>(audio-stream-position-seconds audio-stream)</procedure>
    336 
    337 Impements al_get_audio_stream_position_secs.
    338 
    339 <procedure>(audio-stream-length-seconds audio-stream)</procedure>
    340 
    341 Implements al_get_audio_length_secs.
    342 
    343 <procedure>(audio-stream-loop-set! audio-stream (double start-seconds) (double end-seconds))</procedure>
    344 
    345 Implements al_set_audio_stream_loop_secs.
    346 
    347 <procedure>(audio-stream-event-source audio-stream)</procedure>
    348 
    349 Implements al_get_audio_stream_event_source.
    350 
    351 <procedure>(make-mixer* (unsigned-integer frequency) audio-depth channel-configuration)</procedure>
    352 
    353 Implements al_create_mixer.
    354 
    355 <procedure>(make-mixer (unsigned-integer frequency) audio-depth channel-configuration)</procedure>
    356 
    357 Implements al_create_mixer, with (free-mixer!) declared as a finalizer.
    358 
    359 <procedure>(free-mixer! mixer)</procedure>
    360 
    361 Implements al_destroy_mixer.
    362 
    363 <procedure>(sample-instance-attach-to-mixer! sample-instance mixer)</procedure>
    364 
    365 Implements al_attach_sample_instance_to_mixer.
    366 
    367 <procedure>(audio-stream-attach-to-mixer! audio-stream mixer)</procedure>
    368 
    369 Implements al_attach_audio_stram_to_mixer.
    370 
    371 <procedure>(mixer-attach-to-mixer! mixer mixer)</procedure>
    372 
    373 Implements al_attach_mixer_to_mixer.
    374 
    375 <procedure>(mixer-postprocess-callback-set! mixer (function void (c-pointer unsigned-integer32 c-pointer)) (c-pointer data))</procedure>
    376 
    377 Implements al_set_mixer_postprocess_callback.
    378 
    379 <procedure>(mixer-frequency mixer)</procedure>
    380 
    381 Implements al_get_mixer_frequency.
    382 
    383 <procedure>(mixer-channels mixer)</procedure>
    384 
    385 Implements al_get_mixer_channels.
    386 
    387 <procedure>(mixer-depth mixer)</procedure>
    388 
    389 Implements al_get_mixer_depth.
    390 
    391 <procedure>(mixer-quality mixer)</procedure>
    392 
    393 Implements al_get_mixer_quality.
    394 
    395 <procedure>(mixer-playing? mixer)</procedure>
    396 
    397 Implements al_get_mixer_playing.
    398 
    399 <procedure>(mixer-attached? mixer)</procedure>
    400 
    401 Implements al_get_mixer_attached.
    402 
    403 <procedure>(mixer-frequency-set! mixer unsigned-integer)</procedure>
    404 
    405 Implements al_set_mixer_frequency.
    406 
    407 <procedure>(mixer-quality-set! mixer mixer-quality)</procedure>
    408 
    409 Implements al_set_mixer_quality.
    410 
    411 <procedure>(mixer-playing-set! mixer bool)</procedure>
    412 
    413 Implements al_set_mixer_playing.
    414 
    415 <procedure>(mixer-detach! mixer)</procedure>
    416 
    417 Implements al_detach_mixer.
    418 
    419 <procedure>(make-voice* (unsigned-integer frequency) audio-depth channel-configuration)</procedure>
    420 
    421 Implements al_create_voice.
    422 
    423 <procedure>(make-voice (unsigned-integer frequency) audio-depth channel-configuration)</procedure>
    424 
    425 Implements al_create_voice, with (free-voice!) declared as a finalizer.
    426 
    427 <procedure>(free-voice! voice)</procedure>
    428 
    429 Implements al_destroy_voice.
    430 
    431 <procedure>(sample-instance-attach-to-voice! sample-instance voice)</procedure>
    432 
    433 Implements al_attach_sample_instance_to_voice.
    434 
    435 <procedure>(audio-stream-attach-to-voice! audio-stram voice)</procedure>
    436 
    437 Implements al_attach_audio_stream_to_voice.
    438 
    439 <procedure>(mixer-attach-to-voice! mixer voice)</procedure>
    440 
    441 Implements al_attach_mixer_to_voice.
    442 
    443 <procedure>(voice-detach! voice)</procedure>
    444 
    445 Implements al_detach_voice.
    446 
    447 <procedure>(voice-frequency voice)</procedure>
    448 
    449 Implements al_get_voice_frequency.
    450 
    451 <procedure>(voice-position voice)</procedure>
    452 
    453 Implements al_get_voice_position voice)</procedure>
    454 
    455 <procedure>(voice-channels voice)</procedure>
    456 
    457 Implements al_get_voice_channels.
    458 
    459 <procedure>(voice-depth voice)</procedure>
    460 
    461 Implements al_get_voice_depth.
    462 
    463 <procedure>(voice-playing? voice)</procedure>
    464 
    465 Implements al_get_voice_playing.
    466 
    467 <procedure>(voice-position-set! voice unsigned-integer)</procedure>
    468 
    469 Implements al_set_voice_position.
    470 
    471 <procedure>(voice-playing-set! voice bool)</procedure>
    472 
    473 Implements al_set_voice_playing.
    474 
    475 <procedure>(audio-addon-install)</procedure>
    476 
    477 Implements al_install_audio.
    478 
    479 <procedure>(audio-addon-uninstall)</procedure>
    480 
    481 Implements al_uninstall_audio.
    482 
    483 <procedure>(audio-addon-installed?)</procedure>
    484 
    485 Implements al_is_audio_installed.
    486 
    487 <procedure>(audio-addon-version)</procedure>
    488 
    489 Implements al_get_allegro_audio_version.
    490 
    491 <procedure>(channel-configuration-count channel-configuration)</procedure>
    492 
    493 Implements al_get_channel_count.
    494 
    495 <procedure>(audio-depth-size audio-depth)</procedure>
    496 
    497 Implements al_get_audio_depth_size.
    498 
    499 <procedure>(default-mixer)</procedure>
    500 
    501 Implements al_get_default_mixer.
    502 
    503 <procedure>(default-mixer-set! mixer)</procedure>
    504 
    505 Implements al_set_default_mixer.
    506 
    507 <procedure>(default-mixer-restore!)</procedure>
    508 
    509 Implements al_restore_default_mixer.
    510 
    511 <procedure>(sample-play sample (float gain) (float pan) (float speed) playmode sample-id)</procedure>
    512 
    513 Implements al_play_sample.
    514 
    515 The Sample ID is written to the provided sample-id struct.
    516 
    517 <procedure>(sample-stop sample-id)</procedure>
    518 
    519 Implements al_stop_sample.
    520 
    521 <procedure>(reserve-samples integer)</procedure>
    522 
    523 Implements al_reserve_samples.
    524 
    525 <procedure>(stop-all-samples)</procedure>
    526 
    527 Implements al_stop_samples.
    528 
    529 <procedure>(register-sample-loader (string extension) (function sample ((const string))))</procedure>
    530 
    531 Implements al_register_sample_loader.
    532 
    533 <procedure>(register-sample-saver (string extension) (function bool ((const c-string) sample)))</procedure>
    534 
    535 Implements al_register_sample_saver.
    536 
    537 <procedure>(register-audio-stream-loader (string extension) (function audio-stream ((const string) size_t unsigned-integer32)))</procedure>
    538 
    539 Implements al_register_audio_stream_loader.
    540 
    541 <procedure>(register-sample-file-loader (string extension) (function sample (file)))</procedure>
    542 
    543 Implements al_register_sample_loader_f.
    544 
    545 <procedure>(register-sample-file-saver (string extension) (function bool (file sample)))</procedure>
    546 
    547 Implements al_register_sample_saver_f.
    548 
    549 <procedure>(register-audio-stream-file-loader (string extension) (function audio-stream (file size_t unsigned-integer)))</procedure>
    550 
    551 Implements al_register_audio_stream_loader_f.
    552 
    553 <procedure>(load-sample* string)</procedure>
    554 
    555 Implements al_load_sample.
    556 
    557 <procedure>(load-sample string)</procedure>
    558 
    559 Implements al_load_sample, with (free-sample!) declared as a finalizer.
    560 
    561 <procedure>(load-audio-stream* string (integer buffer-count) (unsigned-integer samples))</procedure>
    562 
    563 Implements al_load_audio_stream.
    564 
    565 <procedure>(load-audio-stream string (integer buffer-count) (unsigned-integer samples))</procedure>
    566 
    567 Implements al_load_audio_stream, with (free-audio-stream!) declared as a finalizer.
    568 
    569 <procedure>(load-audio-stream-from-file* file (string identity) (integer buffer-count) (unsigned-integer samples))</procedure>
    570 
    571 Implements al_load_audio_straem_from_file.
    572 
    573 <procedure>(load-audio-stream-from-file file (string identity) (integer buffer-count) (unsigned-integer samples))</procedure>
    574 
    575 Implements al_load_audio_straem_from_file, with (free-audio-stream!) declared as a finalizer.
    576 
    577 <procedure>(load-sample-from-file* file (string identity))</procedure>
    578 
    579 Implements al_load_sample_f.
    580 
    581 <procedure>(load-sample-from-file file (string identity))</procedure>
    582 
    583 Implements al_load_sample_f, with (free-sample!) declared as a finalizer.
    584 
    585 <procedure>(sample-save-to-file sample file (string identity))</procedure>
    586 
    587 Implements al_save_sample_f.
    588 
    589 <procedure>(sample-save sample (string filename))</procedure>
    590 
    591 Implements al_save_sample.
    592 
    593 
    594 === Audio Codec Addon
    595 
    596 <procedure>(acodec-addon-init)</procedure>
    597 
    598 Implements al_init_acodec_addon.
    599 
    600 <procedure>(acodec-addon-version)</procedure>
    601 
    602 Implements al_get_allegro_acodec_version.
     127=== Bitmap
     128
     129<procedure>(new-bitmap-format-set! pixel-format)</procedure>
     130
     131Implements al_set_new_bitmap_format.
     132
     133<procedure>(new-bitmap-format)</procedure>
     134
     135Implements al_get_new_bitmap_flags.
     136
     137<procedure>(new-bitmap-flags-set! bitmap-flag)</procedure>
     138
     139Implements al_set_new_bitmap_flags.
     140
     141<procedure>(new-bitmap-flags)</procedure>
     142
     143Implements al_get_new_bitmap_flags.
     144
     145<procedure>(new-bitmap-add-flag bitmap-flag)</procedure>
     146
     147Implements al_add_new_bitmap_flag.
     148
     149<procedure>(make-bitmap* (integer width) (integer height))</procedure>
     150
     151Implements al_create_bitmap.
     152
     153<procedure>(make-bitmap (integer width) (integer height))</procedure>
     154
     155Implements al_create_bitmap, with (free-bitmap!) declared as a finalizer.
     156
     157<procedure>(bitmap-draw bitmap (float dx) (float dy) bitmap-flag)</procedure>
     158
     159Implements al_draw_bitmap.
     160
     161<procedure>(draw-bitmap bitmap (float dx) (float dy) bitmap-flag)</procedure>
     162
     163Implements al_draw_bitmap.
     164
     165<procedure>(bitmap-draw-region bitmap (float sx) (float sy) (float sw) (float sh) (float dx) (float dy) (integer bitmap-flags))</procedure>
     166
     167Implements al_draw_bitmap_region.
     168
     169<procedure>(draw-bitmap-region bitmap (float sx) (float sy) (float sw) (float sh) (float dx) (float dy) (integer bitmap-flags))</procedure>
     170
     171Implements al_draw_bitmap_region.
     172
     173<procedure>(bitmap-draw-scaled bitmap (float sx) (float sy) (float sw) (float sh) (float dx) (float dy) (float dw) (float dh) (integer bitmap-flags))</procedure>
     174
     175Implements al_draw_scaled_bitmap.
     176
     177<procedure>(draw-scaled-bitmap bitmap (float sx) (float sy) (float sw) (float sh) (float dx) (float dy) (float dw) (float dh) (integer bitmap-flags))</procedure>
     178
     179Implements al_draw_scaled_bitmap.
     180
     181<procedure>(bitmap-draw-rotated bitmap (float cx) (float cy) (float dx) (float dy) (float angle) (integer bitmap-flags))</procedure>
     182
     183Implements al_draw_rotated_bitmap.
     184
     185<procedure>(draw-rotated-bitmap bitmap (float cx) (float cy) (float dx) (float dy) (float angle) (integer bitmap-flags))</procedure>
     186
     187Implements al_draw_rotated_bitmap.
     188
     189<procedure>(bitmap-draw-scaled-rotated bitmap (float cx) (float cy) (float dx) (float dy) (float xscale) (float yscale) (float angle) (integer bitmap-flags))</procedure>
     190
     191Implements al_draw_scaled_rotated_bitmap.
     192
     193<procedure>(draw-scaled-rotated-bitmap bitmap (float cx) (float cy) (float dx) (float dy) (float xscale) (float yscale) (float angle) (integer bitmap-flags))</procedure>
     194
     195Implements al_draw_scaled_rotated_bitmap.
     196
     197<procedure>(bitmap-draw-tinted (bitmap bmp) (color tint) (float dx) (float dy) (integer bitmap-flags))</procedure>
     198
     199Implements al_draw_tinted_bitmap.
     200
     201<procedure>(draw-tinted-bitmap (bitmap bmp) (color tint) (float dx) (float dy) (integer bitmap-flags))</procedure>
     202
     203Implements al_draw_tinted_bitmap.
     204
     205<procedure>(bitmap-draw-tinted-region (bitmap bmp) (color tint) (float sx) (float sy) (float sw) (float sh) (float dx) (float dy) (integer bitmap-flags))</procedure>
     206
     207Implements al_draw_tinted_bitmap_region.
     208
     209<procedure>(draw-tinted-bitmap-region (bitmap bmp) (color tint) (float sx) (float sy) (float sw) (float sh) (float dx) (float dy) (integer bitmap-flags))</procedure>
     210
     211Implements al_draw_tinted_bitmap_region.
     212
     213<procedure>(bitmap-draw-tinted-scaled (bitmap bmp) (color tint) (float sx) (float sy) (float sw) (float sh) (float dx) (float dy) (float dw) (float dh) (integer flags))</procedure>
     214
     215Implements al_draw_tinted_scale_bitmap.
     216
     217<procedure>(draw-tinted-scaled-bitmap (bitmap bmp) (color tint) (float sx) (float sy) (float sw) (float sh) (float dx) (float dy) (float dw) (float dh) (integer flags))</procedure>
     218
     219Implements al_draw_tinted_scale_bitmap.
     220
     221<procedure>(bitmap-draw-tinted-rotated (bitmap bmp) (color tint) (float cx) (float cy) (float dx) (float dy) (float angle) (integer flags))</procedure>
     222
     223Implements al_draw_tinted_rotated_bitmap.
     224
     225<procedure>(draw-tinted-rotated-bitmap (bitmap bmp) (color tint) (float cx) (float cy) (float dx) (float dy) (float angle) (integer flags))</procedure>
     226
     227Implements al_draw_tinted_rotated_bitmap.
     228
     229<procedure>(bitmap-draw-tinted-scaled-rotated (bitmap bmp) (color tint) (float cx) (float cy) (float dx) (float dy) (float xscale) (float yscale) (float angle) (integer flags))</procedure>
     230
     231Implements al_draw_tinted_scaled_rotated_bitmap.
     232
     233<procedure>(draw-tinted-scaled-rotated-bitmap (bitmap bmp) (color tint) (float cx) (float cy) (float dx) (float dy) (float xscale) (float yscale) (float angle) (integer flags))</procedure>
     234
     235Implements al_draw_tinted_scaled_rotated_bitmap.
     236
     237<procedure>(bitmap-lock*! bitmap pixel-format (integer locking-flag))</procedure>
     238
     239Implements al_lock_bitmap.
     240
     241<procedure>(lock-bitmap*! bitmap pixel-format (integer locking-flag))</procedure>
     242
     243Implements al_lock_bitmap.
     244
     245<procedure>(bitmap-lock-region*! bitmap (integer x) (integer y) (integer width) (integer height) pixel-format (integer locking-flag))</procedure>
     246
     247Implements al_lock_bitmap_region.
     248
     249<procedure>(lock-bitmap-region*! bitmap (integer x) (integer y) (integer width) (integer height) pixel-format (integer locking-flag))</procedure>
     250
     251Implements al_lock_bitmap_region.
     252
     253<procedure>(bitmap-unlock! bitmap)</procedure>
     254
     255Implements al_unlock_bitmap.
     256
     257<procedure>(unlock-bitmap! bitmap)</procedure>
     258
     259Implements al_unlock_bitmap.
     260
     261<procedure>(bitmap-lock! bitmap pixel-format (integer bitmap-flags))</procedure>
     262
     263Implements al_lock_bitmap, with (bitmap-unlock!) and (free-locked-region!) declared as finalizers.
     264
     265<procedure>(lock-bitmap! bitmap pixel-format (integer bitmap-flags))</procedure>
     266
     267Implements al_lock_bitmap, with (bitmap-unlock!) and (free-locked-region!) declared as finalizers.
     268
     269<procedure>(bitmap-lock-region! bitmap (integer x) (integer y) (integer width) (integer height) pixel-format (integer bitmap-flags))</procedure>
     270
     271Implements al_lock_bitmap_region, with (bitmap-unlock!) and (free-locked-region!) declared as finalizers.
     272
     273<procedure>(lock-bitmap-region! bitmap (integer x) (integer y) (integer width) (integer height) pixel-format (integer bitmap-flags))</procedure>
     274
     275Implements al_lock_bitmap_region, with (bitmap-unlock!) and (free-locked-region!) declared as finalizers.
     276
     277<procedure>(bitmap-pixel! (bitmap bmp) (int x) (int y) (color c))</procedure>
     278
     279Sets the provided color struct to the color value at the given coordinates.
     280
     281<procedure>(bitmap-pixel* (bitmap bmp) (int x) (int y))</procedure>
     282
     283Returns a new color struct of the color value at the given coordinates.
     284
     285<procedure>(bitmap-pixel (bitmap bmp) (int x) (int y))</procedure>
     286
     287Returns a new color struct of the color value at the given coordinates, with (free-color!) declared as a finalizer.
     288
     289<procedure>(bitmap-width bitmap)</procedure>
     290
     291Implements al_get_bitmap_width.
     292
     293<procedure>(bitmap-height bitmap)</procedure>
     294
     295Implements al_get_bitmap_height.
     296
     297<procedure>(bitmap-format bitmap)</procedure>
     298
     299Implements al_get_bitmap_format.
     300
     301<procedure>(bitmap-flags bitmap)</procedure>
     302
     303Implements al_get_bitmap_flags.
     304
     305<procedure>(bitmap-mask->alpha! bitmap color)</procedure>
     306
     307Implements al_convert_mask_to_alpha.
     308
     309<procedure>(bitmap-clone* bitmap)</procedure>
     310
     311Implements al_clone_bitmap.
     312
     313<procedure>(bitmap-clone bitmap)</procedure>
     314
     315Implements al_clone_bitmap, with (free-bitmap!) declared as a finalizer.
     316
     317<procedure>(bitmap-locked? bitmap)</procedure>
     318
     319Implements al_is_bitmap_locked.
     320
     321<procedure>(bitmap-put-pixel! bitmap (integer x) (integer y) (color c))</procedure>
     322
     323Implements _al_put_pixel.
     324
     325<procedure>(make-sub-bitmap* bitmap (integer x) (integer y) (integer width) (integer height))</procedure>
     326
     327Implements al_create_sub_bitmap.
     328
     329<procedure>(make-sub-bitmap bitmap (integer x) (integer y) (integer width) (integer height))</procedure>
     330
     331Implements al_create_sub_bitmap, with (free-bitmap!) declared as a finalizer.
     332
     333<procedure>(sub-bitmap? bitmap)</procedure>
     334
     335Implements al_is_sub_bitmap.
     336
     337<procedure>(put-pixel (integer x) (integer y) (color c))</procedure>
     338
     339Implements al_put_pixel.
     340
     341<procedure>(put-blended-pixel (integer x) (integer y) (color c))</procedure>
     342
     343Implements al_put_blended_pixel.
     344
     345<procedure>(pixel-size pixel-format)</procedure>
     346
     347Implements al_get_pixel_size.
     348
     349<procedure>(color-map-rgb! (color c) (unsigned-byte r) (unsigned-byte g) (unsigned-byte b))</procedure>
     350
     351Maps rgb values onto the provided color struct, implementing al_map_rgb.
     352
     353<procedure>(color-map-rgba! (color c) (unsigned-byte r) (unsigned-byte g) (unsigned-byte b) (unsigned-byte a))</procedure>
     354
     355Maps rgba values onto the provided color struct, implementing al_map_rgba.
     356
     357<procedure>(color-map-rgb-float! (color c) (unsigned-byte r) (unsigned-byte g) (unsigned-byte b))</procedure>
     358
     359Maps rgb values onto the provided color struct, implementing al_map_rgb_f.
     360
     361<procedure>(color-map-rgba-float! (color c) (unsigned-byte r) (unsigned-byte g) (unsigned-byte b) (unsigned-byte a))</procedure>
     362
     363Maps rgba values onto the provided color struct, implementing al_map_rgba_f.
     364
     365<procedure>(map-rgb* r g b)</procedure>
     366
     367Returns a new color struct mapped to the given rgb values.
     368
     369<procedure>(map-rgb r g b)</procedure>
     370
     371Returns a new color struct mapped to the given rgb values, with (free-color!) declared as a finalizer.
     372
     373<procedure>(map-rgba* r g b a)</procedure>
     374
     375Prodcues a new color struct mapped to the given rgba values.
     376
     377<procedure>(map-rgba r g b a)</procedure>
     378
     379Returns a new color struct mapped to the given rgba values, with (free-color!) declared as a finalizer.
     380
     381<procedure>(map-rgb-float* r g b)</procedure>
     382
     383Returns a new color struct mapped to the given rgb values.
     384
     385<procedure>(map-rgb-float r g b)</procedure>
     386
     387Returns a new color struct mapped to the given rgb values, with (free-color!) declared as a finalizer.
     388
     389<procedure>(map-rgba-float* r g b a)</procedure>
     390
     391Returns a new color struct mapped to the given rgba values.
     392
     393<procedure>(map-rgba-float r g b a)</procedure>
     394
     395Returns a new color struct mapped to the given rgba values, with (free-color!) declared as a finalizer.
     396
     397<procedure>(color-unmap-rgb color)</procedure>
     398
     399Returns a 3-element list of the rgb values representing a given color struct.
     400
     401<procedure>(color-unmap-rgba color)</procedure>
     402
     403Returns a 4-element list of the rgba values representing a given color struct.
     404
     405<procedure>(color-unmap-rgb-float color)</procedure>
     406
     407Returns a 3-element list of the rgb values representing a given color struct.
     408
     409<procedure>(color-unmap-rgba-float color)</procedure>
     410
     411Returns a 4-element list of the rgb values representing a given color struct.
     412
     413<procedure>(pixel-format-bits pixel-format)</procedure>
     414
     415Implements al_get_pixel_format_bits.
     416
     417<procedure>(clipping-rectangle)</procedure>
     418
     419Returns a 4-element list of the x, y, width and height values of the current clipping rectangle.
     420
     421<procedure>(clippingle-rectangle-set! (integer x) (integer y) (integer width) (integer height))</procedure>
     422
     423Sets the current clipping rectangle.
     424
     425<procedure>(blender)</procedure>
     426
     427Returns a 3-element list of the op, source and destination of the current blender.
     428
     429<procedure>(blender-set! (blend-operation op) (integer source) (integer destination))</procedure>
     430
     431Implements al_set_blender.
     432
     433<procedure>(separate-blender)</procedure>
     434
     435Returns a 6-element list of the op, source, destination, alpha op, alpha source, and alpha destination.
     436
     437<procedure>(separate-blender-set! (blend-operation op) (integer src) (integer destination) (integer alpha-op) (integer alpha-source) (integer alpha-destination))</procedure>
     438
     439Implements al_set_separate_blender.
     440
     441=== Bitmap I/O
     442
     443<procedure>(register-bitmap-loader (string extension) (function bitmap ((const c-string))))</procedure>
     444
     445Implements al_register_bitmap_loader.
     446
     447<procedure>(register-bitmap-file-loader (string extension) (function bitmap (file)))</procedure>
     448
     449Implements al_register_bitmap_loader_f.
     450
     451<procedure>(register-bitmap-saver (string extension) ((function bool ((const c-string) bitmap)) saver))</procedure>
     452
     453Implements al_register_bitmap_saver.
     454
     455<procedure>(register-bitmap-file-saver (string extension) ((function bool (file bitmap)) saver))</procedure>
     456
     457Implements al_register_bitmap_saver_f.
     458
     459<procedure>(load-bitmap* string)</procedure>
     460
     461Implements al_load_bitmap.
     462
     463<procedure>(load-bitmap string)</procedure>
     464
     465Implements al_load_bitmap, with (free-bitmap!) declared as a finalizer.
     466
     467<procedure>(load-bitmap-from-file* file string)</procedure>
     468
     469Implements al_load_bitmap_f.
     470
     471<procedure>(load-bitmap-from-file file string)</procedure>
     472
     473Implements al_load_bitmap_f, with (free-bitmap!) declared as a finalizer.
     474
     475<procedure>(bitmap-save bitmap string)</procedure>
     476
     477Implements al_save_bitmap.
     478
     479<procedure>(bitmap-save-to-file bitmap file string)</procedure>
     480
     481Implements al_save_bitmap_f.
Note: See TracChangeset for help on using the changeset viewer.