Author Topic: Danmakufu Contest #4 - Laser Light Show (Results!)  (Read 89266 times)

Re: Danmakufu Contest #4 - Laser Light Show
« Reply #30 on: February 16, 2010, 03:33:26 AM »
I just had an idea that sounds good on paper
Spoiler:
no pun intended
but will probably flop in practice. Let's see if I can make it work for this -- or finish it, for that matter.

EDIT: ...Nope, don't see how it would work. Back to the drawing board.

You can ask about it in the Q&A thread, or get on irc if you want. Sometimes the answer gets overlooked, and needs a second mind to think about it. Don't worry about it being copied or anything, we're not not like that here. Well, I'm not.

Re: Danmakufu Contest #4 - Laser Light Show
« Reply #31 on: February 16, 2010, 06:07:01 PM »
Wish I could participate, but I don't know anything about programming.

Oh well, I can at least look forward to playing these. Already played the first one. That first spellcard was the best one in it. Did a perfect pacifist on the entire script as well.

AweStriker Nova

  • Star Sign "Thunder Constellation"
Re: Danmakufu Contest #4 - Laser Light Show
« Reply #32 on: February 17, 2010, 02:37:32 AM »
Of all the times to hit on a huge flood of ideas, why NOW do I have too much else to do?

I might enter, but only if I can get all this other stuff done.

Nimble

  • Broken English Fox
  • Rushing toward the bullet!
    • Viewmix
Re: Danmakufu Contest #4 - Laser Light Show
« Reply #33 on: February 19, 2010, 11:26:14 AM »
Oh.... 32 days left, too quite.

Just got some idea, but may be I can't make it in time - final exam and too many work to clear before 21 Feb'. I'll try my best.

« Last Edit: February 19, 2010, 11:28:02 AM by Nimble »

Iryan

  • Ph?nglui mglw?nafh
  • Cat R?lyeh wgah?nagl fhtagn.
Re: Danmakufu Contest #4 - Laser Light Show
« Reply #34 on: February 19, 2010, 11:31:20 PM »
Since victory by default is kind of boring, I think I'll increase the number of entries by 1.  :V

My entry.
Contains version for normal and lunatic difficulty.

Some of the lasers are kind of bullet-like, but given how they are used I hope they fit still within the boundaries of the contest. Also, if the last card causes slow down, then I am sorry. It runs fine on my PC, but I think it may prove problematic...
Old Danmakufu stuff can be found here!

"As the size of an explosion increases, the numbers of social situations it is incapable of solving approaches zero."

Re: Danmakufu Contest #4 - Laser Light Show
« Reply #35 on: February 20, 2010, 12:02:24 AM »
Since victory by default is kind of boring, I think I'll increase the number of entries by 1.  :V

My entry.
Contains version for normal and lunatic difficulty.

Some of the lasers are kind of bullet-like, but given how they are used I hope they fit still within the boundaries of the contest. Also, if the last card causes slow down, then I am sorry. It runs fine on my PC, but I think it may prove problematic...
A minor thing, but it still says Lunatic on the side on Normal Mode :V

Re: Danmakufu Contest #4 - Laser Light Show
« Reply #36 on: February 20, 2010, 02:33:04 AM »
Entry.
Download

KomeijiKoishi

Re: Danmakufu Contest #4 - Laser Light Show
« Reply #37 on: February 20, 2010, 06:00:55 PM »
Code: [Select]
#TouhouDanmakufu
#Title[Lasers Everywhere "Patrick Alexander's Entry"]
#Text[Test script]
#BackGround[User(.\black.png, 1, 1)]
#BGM[script/st6boss2.wav]
#Player[FREE]
#ScriptVersion[2]

script_enemy_main {

    let ImgBoss = "script\img\ExRumia.png";

    let count = -240;

    let SMT = 0;
   
    let fire = 0;

    let l = 0;

    let life = 600;

    @Initialize {
        SetLife(1);
        SetDamageRate(0, 0);
        SetTimer(65);
        SetInvincibility( 200 );
ForbidShot(true);
        LoadGraphic(ImgBoss);

        SetMovePosition02(GetCenterX, GetCenterY-90, 120);
        CutIn(YOUMU, "Lasers Everywhere "\""Patrick Alexander's Entry"\", 0, 0, 0, 0, 0);
        LoadUserShotData("\lib\SHOT_REPLACE\shot_All.dnh");
        SetGraphicRect(0, 0, 64, 64);
    }

    @MainLoop {
    SetCollisionA(GetX, GetY, 32);
    SetCollisionB(GetX, GetY, 16);

    if ((count == 0)){
    Inner;
    }


    if ((count == 1440)){
    InnerTwo;
    }


    if ((count == 2640)){
    InnerThree;
    }

   
    count++;
    SMT++;
    yield;
    }

    @DrawLoop {
      SetTexture(ImgBoss);
      DrawGraphic(GetX, GetY);
    }

    @Finalize {
      DeleteGraphic(ImgBoss);
    }


 

   task Inner{
   let b = 180;
   let bup = 3.23;
   let reverse = 0;
   let lrar = 0;
   let kput = 180;
   let krar = 360/kput;
   
   
   let Length = 100;
   yield;

   let x = 2.3;
   
   let n = 0;
   
   let q = 0;
   
   let RollerX;
   let RollerY;
   let random;
   
   loop{
   
   PlaySE(GetCurrentScriptDirectory~"SE\se_tan01.wav");
    ascent(a in 1..kput+1){
    RollerX = GetX + Length * cos((a*krar+b)+1*(360/2));
    RollerY = GetY + Length * sin((a*krar+b)+1*(360/2));
    CreateLaser01(RollerX, RollerY, 2.5, a*10, 120, 8, 163, 30);
    }
   if (reverse == 0){
   if (bup > -0.7){
   bup += 1.3;
   }
   else{
   reverse++;
   }
   }
   else{
   if (bup > 120){
   bup -= 0;
   }
   else{
   reverse--;
   }
   }
   b += bup;
   if (Length > -200){
   Length -= 0;
   }
   
   loop(180){
   yield;
   }
   }
   }

   task InnerTwo{
   let b = 180;
   let bup = 3;
   let reverse = 0;
   let lrar = 0;
   let kput = 2;
   let krar = 180;
   
   
   let Length = 60;
   yield;

   let x = 2.3;
   
   let n = 0;
   
   let q = 0;
   
   let RollerX;
   let RollerY;
   let random;
   
   loop{
   
   PlaySE(GetCurrentScriptDirectory~"SE\se_tan01.wav");
    ascent(a in 1..kput+1){
    RollerX = GetX + Length * sin(count) * cos((a*krar+b)+1*(360/2)) + 60 * cos(count*0.96);
    RollerY = GetY + Length * sin(count) * sin((a*krar+b)+1*(360/2)) + 60 * sin(count*0.96);
    CreateLaser01(RollerX, RollerY, 5, (a*krar+b)+count*1.34, 200, 10, 162, 30);

    }
   if (reverse == 0){
   if (bup > -0.7){
   bup += 0;
   }
   else{
   reverse++;
   }
   }
   else{
   if (bup > 120){
   bup -= 0;
   }
   else{
   reverse--;
   }
   }
   b += bup;
   if (Length > -200){
   Length -= 0;
   }
   
   loop(5){
   yield;
   }
   }
   }

   task InnerThree{
   let b = 180;
   let bup = 3;
   let reverse = 0;
   let lrar = 0;
   let kput = 10;
   let krar = 36;
   
   
   let Length = 100;
   yield;

   let x = 2.3;
   
   let n = 0;
   
   let q = 0;
   
   let RollerX;
   let RollerY;
   let random;
   
   loop{
   
   PlaySE(GetCurrentScriptDirectory~"SE\se_tan01.wav");
    ascent(a in 1..kput+1){
    RollerX = GetX + Length * cos((a*krar+b)+1*(360/2));
    RollerY = GetY + Length * sin((a*krar+b)+1*(360/2));
    CreateLaser01(RollerX, RollerY, 3.5, atan2(GetPlayerY-RollerY, GetPlayerX-RollerX)+rand(-25, 25), 140, 16, 55, 30);
    }
   if (reverse == 0){
   if (bup > -0.7){
   bup += 0;
   }
   else{
   reverse++;
   }
   }
   else{
   if (bup > 120){
   bup -= 0;
   }
   else{
   reverse--;
   }
   }
   b += bup;
   if (Length > -200){
   Length -= 0;
   }
   
   loop(180){
   yield;
   }
   }
   }

 




    task TheshotUp(x, y, v, angle, graphic, delay){
        let obj = Obj_Create(OBJ_SHOT);
      let a = 0;
      let b = 0;
      let dir = angle;
        Obj_SetX(obj, x);
        Obj_SetY(obj, y);
        Obj_SetSpeed(obj, v);
        Obj_SetAngle(obj, angle);
        ObjShot_SetGraphic(obj, graphic);
        ObjShot_SetDelay(obj, delay);
        Obj_SetAutoDelete(obj, false);
        while (!Obj_BeDeleted(obj)){
      if (a == 120){
   Obj_SetAutoDelete(obj, true);
     }
      a++;
      b++;
      yield;
      }
}

    task TheshotCircle(x, y, v, angle, graphic, delay){
        let obj = Obj_Create(OBJ_SHOT);
      let a = 0;
      let b = 0;
      let dir = angle;
        Obj_SetX(obj, x);
        Obj_SetY(obj, y);
        Obj_SetSpeed(obj, v);
        Obj_SetAngle(obj, angle);
        ObjShot_SetGraphic(obj, graphic);
        ObjShot_SetDelay(obj, delay);
      ObjShot_SetBombResist(obj, true);
        while (!Obj_BeDeleted(obj)){
      if (a == 120){
        Obj_SetSpeed(obj, v*8);
     }
      a++;
      b++;
      yield;
      }
}

}


My entry, put together just for fun.

Shockman

  • Some idiot
  • I can't believe I got this account back .|.|.
Re: Danmakufu Contest #4 - Laser Light Show
« Reply #38 on: February 20, 2010, 06:26:29 PM »
entry
http://www.megaupload.com/?d=7RP2IJTU

3 spells total

I used marx for the sprite again.  :V
« Last Edit: February 20, 2010, 06:30:00 PM by Shockman »

Chronojet ⚙ Dragon

  • The Oddity
  • 今コソ輝ケ、我ガ未来、ソノ可能性!!
Re: Danmakufu Contest #4 - Laser Light Show
« Reply #39 on: February 20, 2010, 06:28:40 PM »
Oh, no. I can't finish my entry in time. Ah, well.

AweStriker Nova

  • Star Sign "Thunder Constellation"
Re: Danmakufu Contest #4 - Laser Light Show
« Reply #40 on: February 20, 2010, 09:25:13 PM »
Here, I'll list the cards by name here, so you can anticipate.

Time Stream "Relativity of Light" [done]
Arcane Art "Color Spray" [done, may be a framerate-killer]
"Future of War" [multi-phase survival with supershort phases]
« Last Edit: February 21, 2010, 02:40:18 AM by AweStriker Nova »

Blargel

  • RAWR!
  • I'M AN ANGRY LOLI!
Re: Danmakufu Contest #4 - Laser Light Show
« Reply #41 on: February 21, 2010, 12:47:07 AM »
There's less than a day left! Hurry up if you plan to submit something!

It's official; I'm not putting in an entry. But I'll have something that fits the contest's rules, no doubt.
So... you're not entering the contest but you're making something that fits the rules. Am I supposed to judge it or not?  :/
<WorkingKeine> when i get home i just go to the ps3 and beat people up in blazblue with a loli
<Azure> Keine: Danmakufu helper by day, violent loli by night.

AweStriker Nova

  • Star Sign "Thunder Constellation"
Re: Danmakufu Contest #4 - Laser Light Show
« Reply #42 on: February 21, 2010, 12:57:18 AM »
If I get it in before the deadline, go ahead. I'd been contemplating how to get the scripts to work in my head, so that's why I got those first two done so quickly.

You might have to excuse a lack of polish; I had to write a paper and a lab report recently, and I have a test in a couple of days.
« Last Edit: February 21, 2010, 01:00:59 AM by AweStriker Nova »

Re: Danmakufu Contest #4 - Laser Light Show
« Reply #43 on: February 21, 2010, 01:15:46 AM »
Hey I'm not even done my first spell :V

Kinzo the Astro Curious

  • One small step for Desu; One giant leap for touhou-kind!
Re: Danmakufu Contest #4 - Laser Light Show
« Reply #44 on: February 21, 2010, 01:23:53 AM »
Why do I only notice this thread now with 22 hours to go, Haven't been to bed yet, 5 hour jitsu meeting tomorrow and with good laser ideas I had recently on paper that will take far far too long to work out how to code?!?

ah well. Think I'll just download some of the entires and have a play instead  :D

Re: Danmakufu Contest #4 - Laser Light Show
« Reply #45 on: February 21, 2010, 01:32:39 AM »
And now I have finished one spellcard :V

Well at least I have something to submit if time runs out

Blargel

  • RAWR!
  • I'M AN ANGRY LOLI!
Re: Danmakufu Contest #4 - Laser Light Show
« Reply #46 on: February 21, 2010, 02:14:50 AM »
Hmm. Shall I give a time extension? The contest is sorely lacking in entries compared to the other ones anyway.
<WorkingKeine> when i get home i just go to the ps3 and beat people up in blazblue with a loli
<Azure> Keine: Danmakufu helper by day, violent loli by night.

AweStriker Nova

  • Star Sign "Thunder Constellation"
Re: Danmakufu Contest #4 - Laser Light Show
« Reply #47 on: February 21, 2010, 02:41:18 AM »
It would certainly be nice...

Blargel

  • RAWR!
  • I'M AN ANGRY LOLI!
Re: Danmakufu Contest #4 - Laser Light Show
« Reply #48 on: February 21, 2010, 02:57:15 AM »
After discussing it for like thirty seconds on IRC, I've decided to extend the deadline due to the difficulty of the subject matter. Because most people can only work their Danmakufu stuff on weekends, the extension will be a week long.

The new deadline is February 28nd, 2010 at 23:59:59 GMT. Good luck on your entries.
<WorkingKeine> when i get home i just go to the ps3 and beat people up in blazblue with a loli
<Azure> Keine: Danmakufu helper by day, violent loli by night.

Re: Danmakufu Contest #4 - Laser Light Show
« Reply #49 on: February 21, 2010, 03:07:00 AM »
After discussing it for like thirty seconds on IRC, I've decided to extend the deadline due to the difficulty of the subject matter. Because most people can only work their Danmakufu stuff on weekends, the extension will be a week long.

The new deadline is February 28nd, 2010 at 23:59:59 GMT. Good luck on your entries.
Time Extension? Its a good thing I didnt package my entry yet! haha!

Re: Danmakufu Contest #4 - Laser Light Show
« Reply #50 on: February 21, 2010, 05:13:10 AM »
ilu Blargel

Re: Danmakufu Contest #4 - Laser Light Show
« Reply #51 on: February 21, 2010, 05:26:37 AM »
ilu lb
now that i know what that means fixed :D

EDIT: fixed typo
« Last Edit: February 21, 2010, 05:49:53 AM by Demonbman »

Nimble

  • Broken English Fox
  • Rushing toward the bullet!
    • Viewmix
Re: Danmakufu Contest #4 - Laser Light Show
« Reply #52 on: February 21, 2010, 06:04:56 AM »
After discussing it for like thirty seconds on IRC, I've decided to extend the deadline due to the difficulty of the subject matter. Because most people can only work their Danmakufu stuff on weekends, the extension will be a week long.

The new deadline is February 28nd, 2010 at 23:59:59 GMT. Good luck on your entries.

Extend!!


Nobu

  • Serendipitous Youkai
  • *
  • i post while naked
    • My Tumblr
Re: Danmakufu Contest #4 - Laser Light Show
« Reply #53 on: February 21, 2010, 08:30:25 AM »
Woo hoo! o/
Tumblr (sometimes NSFW) | PM for Facebook

Re: Danmakufu Contest #4 - Laser Light Show
« Reply #54 on: February 21, 2010, 11:38:10 AM »
Wow I only finished one Spellcard yet.
And it wasn?t even anything special.

-CHECKPOINT-
Thanks for the time extend.


Iryan

  • Ph?nglui mglw?nafh
  • Cat R?lyeh wgah?nagl fhtagn.
Re: Danmakufu Contest #4 - Laser Light Show
« Reply #55 on: February 21, 2010, 03:34:16 PM »
Dayyyymn, there go my chances at a decent placing.  :V
But yeah, one week was quite little time for a contest with such extraordinary limitations.

I might revise my scripts, improve some cards ore replace them altogether, but I don't know if I'll have the time...
Old Danmakufu stuff can be found here!

"As the size of an explosion increases, the numbers of social situations it is incapable of solving approaches zero."

Chronojet ⚙ Dragon

  • The Oddity
  • 今コソ輝ケ、我ガ未来、ソノ可能性!!
Re: Danmakufu Contest #4 - Laser Light Show
« Reply #56 on: February 21, 2010, 03:58:28 PM »
YES! Now I'll have more ti-- *goes to steal a card from Suneo*

Shockman

  • Some idiot
  • I can't believe I got this account back .|.|.
Re: Danmakufu Contest #4 - Laser Light Show
« Reply #57 on: February 21, 2010, 07:34:36 PM »
After discussing it for like thirty seconds on IRC, I've decided to extend the deadline due to the difficulty of the subject matter. Because most people can only work their Danmakufu stuff on weekends, the extension will be a week long.

The new deadline is February 28nd, 2010 at 23:59:59 GMT. Good luck on your entries.
That's good. I'm thinking about remaking my scripts.

Helepolis

  • Charisma!
  • *
  • O-ojousama!?
Re: Danmakufu Contest #4 - Laser Light Show
« Reply #58 on: February 21, 2010, 07:42:13 PM »
ITT Blargel showing his soft side !

So an week extension huh. I wonder if this will make people refine their work more or finish it. Good luck!


Kinzo the Astro Curious

  • One small step for Desu; One giant leap for touhou-kind!
Re: Danmakufu Contest #4 - Laser Light Show
« Reply #59 on: February 21, 2010, 10:39:29 PM »
Started something today, But doesn't hardly hold a card to some of the work here lol.

Either way pleased I got the maths in it working, if I can be bothered before the end of the deadline, I'll make some nice graphics for it, elsewise I'll package it with some existing ones I made for a my own game lol.

Think I'll try and think up a few extra cards to go with it as well, one alone isnt good enough when you see people with three in there entries  :o