0A95: enable_thread_saving
// 31@ jest naszą flagą \'ikony stworzone\'  


while true
    0001: wait 0 ms
    if
        0038:   $ONMISSION == 0
    then
        if
            0039:   31@ == 0    // Markery nie istnieją?

        then
            1@ = Marker.CreateIconWithoutSphere(48, 1837.0, -1682.0, 14.0)
                  .
                  .
                  .
            29@ = Marker.CreateIconWithoutSphere(48, x, y, z)
            // Dojeżdżamy do ostatniej zmiennej, której możemy użyć zwyczajnym sposobem

            // 30@ zachowamy jako wymaganą zmienną tymczasową, a 31@ jest użyte jako flaga

            30@ = Marker.CreateIconWithoutSphere(48, x, y, z)    
            0AB3: var 423 = 30@     // Zmienna CLEO nr 423 (miejmy nadzieję, że żaden inny skrypt CLEO jej nie używa) zawierać będzie teraz uchwyt do tego marketu

                  .
                  .
                  .
            {49@} 30@ = Marker.CreateIconWithoutSphere(48, -2551.115, 193.657, 5.2)
            0AB3: var 442 = 30@
            {50@} 30@ = Marker.CreateIconWithoutSphere(48, 2507.44, 1242.31, 9.833)
            0AB3: var 443 = 30@
            
            0006: 31@ = 1
        end
    else
        if
            0039:   31@ == 1    // Markery istnieją?    

        then
            Marker.Disable(1@)
                  .
                  .
                  .
            0AB4: 30@ = var 423
            Marker.Disable(30@)
            // Proces analogiczny do tworzenia markerów, tylko w drugą stronę

            // Pobieramy uchwyt ze zmiennej CLEO do zwykłej zmiennej lokalnej i wyłączamy marker

                .
                .
                .
            0AB4: 30@ = var 442
            Marker.Disable({49@} 30@)
            0AB4: 30@ = var 443
            Marker.Disable({50@} 30@) 
            
            0006: 31@ = 0
        end
    end
end

0A8C: write_memory 0x522423 size 2 value 0x9090 virtual_protect 1

:IS_OBJECT_TOUCHING_OBJECT{\__[bool]_(handle, handle)__}
{
    Parametry:
    - 0@ - uchwyt obiektu
    - 1@ - uchwyt obiektu
    
    Zwracane:
    - Prawda - stykają się
    - Fałsz - nie stykają się
}
0A98: 2@ = object 0@ struct
0A98: 3@ = object 1@ struct
0AA8: call_function_method 0x543540 struct 2@ num_params 1 pop 0 3@ 4@
08B7:   test 4@ bit 0
0AB2: ret 0

if 0AB1: call_scm_func @IS_OBJECT_TOUCHING_OBJECT 2 4@ 5@
then
    // Obiekty 4@ i 5@ stykają się

else
    // Obiekty 4@ i 5@ nie stykają się

end