Эффект бликов у взрывов

Скрипт, сделанный для модификации Air & Land (SCM), добавляющий взрывам корону с эффектом бликов.

:ExplosionCorona
thread 'explcor'
wait 0
    for 0@ = 0xC88950 to 0xC89094 step 0x7C //size - 0x7C, number - 16
    0085: 1@ = 0@ // (int)
    1@ += 0x28 //(Byte) Frames from Created
    0A8D: 1@ = read_memory 1@ size 1 virtual_protect 0   
        if
        1@ > 0
        then
        0085: 1@ = 0@ // (int)
        1@ += 0x04 //X
        0A8D: 2@ = read_memory 1@ size 4 virtual_protect 0
        1@ += 4 //Y
        0A8D: 3@ = read_memory 1@ size 4 virtual_protect 0
        1@ += 4 //Z
        0A8D: 4@ = read_memory 1@ size 4 virtual_protect 0
            if
            00C2:   sphere_onscreen 2@ 3@ 4@ radius 4.0           
            then
            024F: create_corona_with_radius 0.2 type 1 lensflares 2 with_color 255 30 0 at 2@ 3@ 4@
            end
        end
    end
jump @ExplosionCorona
end_thread