do_particles(integer go) {
    if(hasparticles && (go || useparticles)) {
        if(verbose) llOwnerSay("Visual effects activated.");
        particles = 1;
        list lParams = llCSV2List(g_sFeatures);
        list lOut;
        list what = [] + PSYS_PART_FLAGS + PSYS_SRC_PATTERN + PSYS_PART_START_ALPHA + PSYS_PART_END_ALPHA + PSYS_PART_START_COLOR + PSYS_PART_END_COLOR + PSYS_PART_START_SCALE + PSYS_PART_END_SCALE +
            PSYS_PART_MAX_AGE + PSYS_SRC_MAX_AGE + PSYS_SRC_ACCEL + PSYS_SRC_BURST_RATE + PSYS_SRC_BURST_PART_COUNT + PSYS_SRC_BURST_RADIUS + PSYS_SRC_BURST_SPEED_MIN + PSYS_SRC_BURST_SPEED_MAX +
            PSYS_SRC_ANGLE_BEGIN + PSYS_SRC_ANGLE_END + PSYS_SRC_OMEGA + PSYS_SRC_TEXTURE + PSYS_SRC_TARGET_KEY;
        integer i; integer ls = (lParams != []);
        for(;i<ls;++i) {
            lOut += llList2Integer(what, i);
            if(i == 0 || i == 1 || i == 12 || i == 13 || i == 14|| i == 15) lOut += llList2Integer(lParams, i);
            else if(i == 2 || i == 3 || i == 8 || i == 9 || i == 11 || i == 16 || i == 17) lOut += llList2Float(lParams, i);
            else if(i == 4 || i == 5 || i == 6 || i == 7 || i == 10 || i == 18) lOut += (vector)llList2String(lParams, i);
            else lOut += llList2Key(lParams, i);
        }
        llParticleSystem(lOut);

    } else if(askme && !particles) {
        gListener = llListen( gchannel, "", llGetOwner(), "");
        llDialog(g_sOwner, "\nWould you like to activate the optional effects that come with this soundpack?", askbuttons, gchannel);
    }
}