Let's Script: ZC Candle Replica

///////////////////////////////////////////////
/// ZScript Quasi-Replica of ZC Candle Item ///
/// By: ZoriaRPG                            ///
/// 9th June 2017                           ///
///////////////////////////////////////////////

item script scriptcandle{
    void run(int useonce){
        int q[8]; lweapon flame[2];
        if ( useonce ) {
            //seek a marker
            for ( q[0] = Screen->NumLWeapons(); q[0] > 0; q[0]-- ) {
                flame[1] = Screen->LoadLWeapon[q[0]];
                if ( flame[1]->ID != LW_SCRIPT10 ) continue();
                if ( flame[1]->Misc[15] = 1 ) Quit();
            }
            flame[1] = Screen->CreateLWeapon(LW_SCRIPT10);
            flame[1]->DeadState = -10;
            flame[1]->DrawYOffset = -900;
            flame[1]->Misc[15] = 1;
        }
        Link->Action = LA_ATTACKING;
        flame[0] = NextToLink(LW_FLAME, 16);
        Game->PlaySound(this->UseSound);
        flame[0]->Damage = this->Power;
        flame[0]->UseSprite(12);
    }
}