BMAP* sun_farbe1 = "sun_red.tga";
var laserAAnzahlPartikel = 20;


function laserA_spec_fun()
{
    c_trace(vector(my.skill_d,my.skill_y,my.skill_z),my.x,IGNORE_ME|IGNORE_PASSABLE|IGNORE_MODELS|IGNORE_SPRITES);
    if(trace_hit == 1)
    {
      my.vel_x = 0;
      my.vel_y = 0;
      my.vel_z = 0;
      my.lifespan = 0;
    }
    my.skill_d = my.x; my.skill_y = my.y; my.skill_z = my.z;
    my.alpha -= 4.909 *time_step;
    if(my.alpha < 0) { my.alpha = 0; my.lifespan = 0; }
}

function laserAspezial()
{
    my.blue = 128 ;
    my.green = 128 ;
    my.red = 128 ;
    my.bmap = sun_farbe1;
    my.vel_x = random( 33.867 ) - 16.934 ;
    my.vel_y = random( 0 ) - 0 ;
    my.vel_z = random( 0 );
    my.size = 1 ;
    my.alpha = 21.738 ;
    my.gravity = 0 ;
    my.streak = off;
    my.flare = off;
    my.bright = on;
    my.beam = off;
    my.move = on;
    my.transparent = off;
    my.function = laserA_spec_fun;
}


function laserA()
{
  while(1)
  {
     laserAAnzahlPartikel = 20;
     effect(laserAspezial,max(1,laserAAnzahlPartikel*time_step),my.x,nullvector);
     wait(1);
  }
}


action laserA_action()
{
  my.invisible = on;
  my.passable = on;
  while(!key_q) { wait(1); }
  laserA();
}

effect(laserAspezial,max(1,laserAAnzahlPartikel*time_step),p.x,nullvector);

function lazerAspezial()
{
   // ...
   // I know it's p.gravity = 0 and p.flags = BRIGHT | MOVE now, but I'll use the original for clarity.
   my.alpha = 21.738 ;
   my.gravity = 0 ;
   my.streak = off;
   my.flare = off;
   my.bright = on;
   my.beam = off;
   my.move = on;
   // ...
}