Post by Genshuku on Jun 24, 2009 19:53:30 GMT -7
So I learned how to Danmakufu and stuff. Here, have some scripts~
HOW TO: If you don't know what Danmakufu is, leave this thread and find out how before coming in here, mmk~?
When that's working (check before you continue) download the shots in here if you want to play the scripts with a red A next to them:
www.shrinemaiden.org/forum/index.php?topic=1525.0
When that's done,I'll never have The Scarlet Letter out of my head feel free to play these scripts by copy pasting EVERYTHING in the codebox below one of the scripts.
Most of the scripts are hard. Thought you should know.
VERY.
HARD.
Because I can't have it any other way.
(Because I have no difficulty sense because my computer is slow. These spells are FAST.)
Key:
A = Download the shots
T = Test thing that I put on this list for kicks
FFF = This card is very very hard. Please press 'I' to watch it peacefully.
Dark Magic: 'Shadow Flare' A
When you see charging, get out of the line of fire.
Not 'when the charging is over', because you will die very fast.
A Fairy's Attack: 'Mindless Aiming Barrage' T A
I coded it while working on a post. Please just imagine it was on an enemy and not a boss, I don't want to learn how to do that sort of thing yet >.<
Dark Magic: 'Gentle Love' A FFF
The name is a lie. Run from the walls while in the middle, you will be forced to climb up to dodge the butterflies, dodge when you get comfortable, watch out for the love on the way back. One direction seems to be easier than the other. Maybe one arm is stronger than the other?
WORK IN PROGRESS HERE, I'VE GOT MORE.
I just haven't put it on here yet. Bear with me D:
And how do you get scrollboxes? These code boxes are pretty big.
HOW TO: If you don't know what Danmakufu is, leave this thread and find out how before coming in here, mmk~?
When that's working (check before you continue) download the shots in here if you want to play the scripts with a red A next to them:
www.shrinemaiden.org/forum/index.php?topic=1525.0
When that's done,
Most of the scripts are hard. Thought you should know.
VERY.
HARD.
Because I can't have it any other way.
(Because I have no difficulty sense because my computer is slow. These spells are FAST.)
Key:
A = Download the shots
T = Test thing that I put on this list for kicks
FFF = This card is very very hard. Please press 'I' to watch it peacefully.
Dark Magic: 'Shadow Flare' A
When you see charging, get out of the line of fire.
Not 'when the charging is over', because you will die very fast.
#TouhouDanmakufu
#Title[Dark Magic: 'Shadow Flare']
#Text[A powerful magic. So powerful, the little sparks hurt like hell and it makes it so very hard to navigate away from th-- OH GOD]
#Player[FREE]
#ScriptVersion[2]
script_enemy_main{
let imgExRumia="script\ExRumia\img\ExRumia.png";
let frame = 0;
let A = 0;
let B = 0;
let C = 0;
let D = 0;
let E = 0;
@Initialize{
SetLife(6000);
SetTimer(120);
SetInvincibility(30);
SetEffectForZeroLife(100, 0, 1);
LoadGraphic(imgExRumia);
LastSpell;
SetMovePosition02(GetCenterX, GetCenterY, 10);
LoadUserShotData("shots\CustomShots1Positive.txt");
}
@MainLoop{
SetCollisionA(GetX, GetY, 32);
frame++;
if(A==25){
CreateShot01(GetX, GetY, 1, GetAngleToPlayer, 252, 120);
CreateShot01(GetX, GetY, 1.5, GetAngleToPlayer, 252, 120);
CreateShot01(GetX, GetY, 2, GetAngleToPlayer, 252, 120);
CreateShot01(GetX, GetY, 2.5, GetAngleToPlayer, 252, 120);
CreateShot01(GetX, GetY, 3, GetAngleToPlayer, 252, 120);
CreateShot01(GetX, GetY, 3.5, GetAngleToPlayer, 252, 120);
CreateShot01(GetX, GetY, 4, GetAngleToPlayer, 252, 120);
CreateShot01(GetX, GetY, 4.5, GetAngleToPlayer, 252, 120);
CreateShot01(GetX, GetY, 5, GetAngleToPlayer, 252, 120);
CreateShot01(GetX, GetY, 5.5, GetAngleToPlayer, 252, 120);
CreateShot01(GetX, GetY, 6, GetAngleToPlayer, 252, 120);
CreateShot01(GetX, GetY, 6.5, GetAngleToPlayer, 252, 120);
CreateShot01(GetX, GetY, 7, GetAngleToPlayer, 252, 120);
CreateShot01(GetX, GetY, 7.5, GetAngleToPlayer, 252, 120);
CreateShot01(GetX, GetY, 8, GetAngleToPlayer, 252, 120);
CreateShot01(GetX, GetY, 8.5, GetAngleToPlayer, 252, 120);
CreateShot01(GetX, GetY, 9, GetAngleToPlayer, 252, 120);
CreateShot01(GetX, GetY, 9.5, GetAngleToPlayer, 252, 120);
CreateShot01(GetX, GetY, 10, GetAngleToPlayer, 252, 120);
CreateShot01(GetX, GetY, 10.5, GetAngleToPlayer, 252, 120);
CreateShot01(GetX, GetY, 11, GetAngleToPlayer, 252, 120);
CreateShot01(GetX, GetY, 11.5, GetAngleToPlayer, 252, 120);
CreateShot01(GetX, GetY, 12, GetAngleToPlayer, 252, 120);
CreateShot01(GetX, GetY, 12.5, GetAngleToPlayer, 252, 120);
CreateShot01(GetX, GetY, 13, GetAngleToPlayer, 252, 120);
CreateShot01(GetX, GetY, 13.5, GetAngleToPlayer, 252, 120);
CreateShot01(GetX, GetY, 14, GetAngleToPlayer, 252, 120);
CreateShot01(GetX, GetY, 14.5, GetAngleToPlayer, 252, 120);
CreateShot01(GetX, GetY, 15, GetAngleToPlayer, 252, 120);
CreateShot01(GetX, GetY, 15.5, GetAngleToPlayer, 252, 120);
CreateShot01(GetX, GetY, 16, GetAngleToPlayer, 252, 120);
CreateShot01(GetX, GetY, 16.5, GetAngleToPlayer, 252, 120);
CreateShot01(GetX, GetY, 1, GetAngleToPlayer + 11, 252, 120);
CreateShot01(GetX, GetY, 1.5, GetAngleToPlayer + 11, 252, 120);
CreateShot01(GetX, GetY, 2, GetAngleToPlayer + 11, 252, 120);
CreateShot01(GetX, GetY, 2.5, GetAngleToPlayer + 11, 252, 120);
CreateShot01(GetX, GetY, 3, GetAngleToPlayer + 11, 252, 120);
CreateShot01(GetX, GetY, 3.5, GetAngleToPlayer + 11, 252, 120);
CreateShot01(GetX, GetY, 4, GetAngleToPlayer + 11, 252, 120);
CreateShot01(GetX, GetY, 4.5, GetAngleToPlayer + 11, 252, 120);
CreateShot01(GetX, GetY, 5, GetAngleToPlayer + 11, 252, 120);
CreateShot01(GetX, GetY, 5.5, GetAngleToPlayer + 11, 252, 120);
CreateShot01(GetX, GetY, 6, GetAngleToPlayer + 11, 252, 120);
CreateShot01(GetX, GetY, 6.5, GetAngleToPlayer + 11, 252, 120);
CreateShot01(GetX, GetY, 7, GetAngleToPlayer + 11, 252, 120);
CreateShot01(GetX, GetY, 7.5, GetAngleToPlayer + 11, 252, 120);
CreateShot01(GetX, GetY, 8, GetAngleToPlayer + 11, 252, 120);
CreateShot01(GetX, GetY, 8.5, GetAngleToPlayer + 11, 252, 120);
CreateShot01(GetX, GetY, 9, GetAngleToPlayer + 11, 252, 120);
CreateShot01(GetX, GetY, 9.5, GetAngleToPlayer + 11, 252, 120);
CreateShot01(GetX, GetY, 10, GetAngleToPlayer + 11, 252, 120);
CreateShot01(GetX, GetY, 10.5, GetAngleToPlayer + 11, 252, 120);
CreateShot01(GetX, GetY, 11, GetAngleToPlayer + 11, 252, 120);
CreateShot01(GetX, GetY, 11.5, GetAngleToPlayer + 11, 252, 120);
CreateShot01(GetX, GetY, 12, GetAngleToPlayer + 11, 252, 120);
CreateShot01(GetX, GetY, 12.5, GetAngleToPlayer + 11, 252, 120);
CreateShot01(GetX, GetY, 13, GetAngleToPlayer + 11, 252, 120);
CreateShot01(GetX, GetY, 13.5, GetAngleToPlayer + 11, 252, 120);
CreateShot01(GetX, GetY, 14, GetAngleToPlayer + 11, 252, 120);
CreateShot01(GetX, GetY, 14.5, GetAngleToPlayer + 11, 252, 120);
CreateShot01(GetX, GetY, 15, GetAngleToPlayer + 11, 252, 120);
CreateShot01(GetX, GetY, 15.5, GetAngleToPlayer + 11, 252, 120);
CreateShot01(GetX, GetY, 16, GetAngleToPlayer + 11, 252, 120);
CreateShot01(GetX, GetY, 16.5, GetAngleToPlayer + 11, 252, 120);
CreateShot01(GetX, GetY, 1, GetAngleToPlayer - 11, 252, 120);
CreateShot01(GetX, GetY, 1.5, GetAngleToPlayer - 11, 252, 120);
CreateShot01(GetX, GetY, 2, GetAngleToPlayer - 11, 252, 120);
CreateShot01(GetX, GetY, 2.5, GetAngleToPlayer - 11, 252, 120);
CreateShot01(GetX, GetY, 3, GetAngleToPlayer - 11, 252, 120);
CreateShot01(GetX, GetY, 3.5, GetAngleToPlayer - 11, 252, 120);
CreateShot01(GetX, GetY, 4, GetAngleToPlayer - 11, 252, 120);
CreateShot01(GetX, GetY, 4.5, GetAngleToPlayer - 11, 252, 120);
CreateShot01(GetX, GetY, 5, GetAngleToPlayer - 11, 252, 120);
CreateShot01(GetX, GetY, 5.5, GetAngleToPlayer - 11, 252, 120);
CreateShot01(GetX, GetY, 6, GetAngleToPlayer - 11, 252, 120);
CreateShot01(GetX, GetY, 6.5, GetAngleToPlayer - 11, 252, 120);
CreateShot01(GetX, GetY, 7, GetAngleToPlayer - 11, 252, 120);
CreateShot01(GetX, GetY, 7.5, GetAngleToPlayer - 11, 252, 120);
CreateShot01(GetX, GetY, 8, GetAngleToPlayer - 11, 252, 120);
CreateShot01(GetX, GetY, 8.5, GetAngleToPlayer - 11, 252, 120);
CreateShot01(GetX, GetY, 9, GetAngleToPlayer - 11, 252, 120);
CreateShot01(GetX, GetY, 9.5, GetAngleToPlayer - 11, 252, 120);
CreateShot01(GetX, GetY, 10, GetAngleToPlayer - 11, 252, 120);
CreateShot01(GetX, GetY, 10.5, GetAngleToPlayer - 11, 252, 120);
CreateShot01(GetX, GetY, 11, GetAngleToPlayer - 11, 252, 120);
CreateShot01(GetX, GetY, 11.5, GetAngleToPlayer - 11, 252, 120);
CreateShot01(GetX, GetY, 12, GetAngleToPlayer - 11, 252, 120);
CreateShot01(GetX, GetY, 12.5, GetAngleToPlayer - 11, 252, 120);
CreateShot01(GetX, GetY, 13, GetAngleToPlayer - 11, 252, 120);
CreateShot01(GetX, GetY, 13.5, GetAngleToPlayer - 11, 252, 120);
CreateShot01(GetX, GetY, 14, GetAngleToPlayer - 11, 252, 120);
CreateShot01(GetX, GetY, 14.5, GetAngleToPlayer - 11, 252, 120);
CreateShot01(GetX, GetY, 15, GetAngleToPlayer - 11, 252, 120);
CreateShot01(GetX, GetY, 15.5, GetAngleToPlayer - 11, 252, 120);
CreateShot01(GetX, GetY, 16, GetAngleToPlayer - 11, 252, 120);
CreateShot01(GetX, GetY, 16.5, GetAngleToPlayer - 11, 252, 120);
A -= 25;
}
if(frame==10){
CreateShot01(GetX, GetY, 1, B, 193, 5);
CreateShot01(GetX, GetY, 1, B + 20 + rand(-5, 5), 193, 5);
CreateShot01(GetX, GetY, 1, B + 40 + rand(-5, 5), 193, 5);
CreateShot01(GetX, GetY, 1, B + 60 + rand(-5, 5), 193, 5);
CreateShot01(GetX, GetY, 1, B + 80 + rand(-5, 5), 193, 5);
CreateShot01(GetX, GetY, 1, B + 100 + rand(-5, 5), 193, 5);
CreateShot01(GetX, GetY, 1, B + 120 + rand(-5, 5), 193, 5);
CreateShot01(GetX, GetY, 1, B + 140 + rand(-5, 5), 193, 5);
CreateShot01(GetX, GetY, 1, B + 160 + rand(-5, 5), 193, 5);
CreateShot01(GetX, GetY, 1, B + 180 + rand(-5, 5), 193, 5);
CreateShot01(GetX, GetY, 1, B + 200 + rand(-5, 5), 193, 5);
CreateShot01(GetX, GetY, 1, B + 220 + rand(-5, 5), 193, 5);
CreateShot01(GetX, GetY, 1, B + 240 + rand(-5, 5), 193, 5);
CreateShot01(GetX, GetY, 1, B + 260 + rand(-5, 5), 193, 5);
CreateShot01(GetX, GetY, 1, B + 280 + rand(-5, 5), 193, 5);
CreateShot01(GetX, GetY, 1, B + 300 + rand(-5, 5), 193, 5);
CreateShot01(GetX, GetY, 1, B + 320 + rand(-5, 5), 193, 5);
CreateShot01(GetX, GetY, 1, B + 340 + rand(-5, 5), 193, 5);
A += 1;
B += 8;
C += 1;
frame = 0;
}
if(C==25){
Concentration01(80);
C -= 25;
}
}
@DrawLoop{
SetColor(255,255,255);
SetRenderState(ALPHA);
SetTexture(imgExRumia);
SetGraphicRect(64,1,127,64);
DrawGraphic(GetX,GetY);
}
@Finalize
{
DeleteGraphic(imgExRumia);
}
}
A Fairy's Attack: 'Mindless Aiming Barrage' T A
I coded it while working on a post. Please just imagine it was on an enemy and not a boss, I don't want to learn how to do that sort of thing yet >.<
#TouhouDanmakufu
#Title[A Fairy's Attack: 'Mindless Aiming Barrage']
#Text[FIRE! FIRE! GOGOGO! GET TO DA CHOPPA!]
#Player[FREE]
#ScriptVersion[2]
script_enemy_main{
let imgExRumia="script\ExRumia\img\ExRumia.png";
let frame = 0;
let C = 0;
let D = 0;
@Initialize{
SetLife(6000);
SetTimer(120);
SetInvincibility(30);
SetEffectForZeroLife(100, 0, 1);
LoadGraphic(imgExRumia);
LastSpell;
SetMovePosition02(GetCenterX, GetCenterY, 10);
LoadUserShotData("shots\CustomShots1Positive.txt");
}
@MainLoop{
SetCollisionA(GetX, GetY, 32);
frame++;
if(frame==3){
CreateShot01(GetX + 30*cos(C), GetY + 30*sin(C), 6, GetAngleToPlayer, 107, 0);
CreateShot01(GetX + 30*cos(C + 90), GetY + 30*sin(C + 90), 6, GetAngleToPlayer, 107, 0);
CreateShot01(GetX + 30*cos(C + 180), GetY + 30*sin(C + 180), 6, GetAngleToPlayer, 107, 0);
CreateShot01(GetX + 30*cos(C + 270), GetY + 30*sin(C + 270), 6, GetAngleToPlayer, 107, 0);
CreateShot01(GetX + 30*cos(D), GetY + 30*sin(D), 6, GetAngleToPlayer, 108, 0);
CreateShot01(GetX + 30*cos(D + 90), GetY + 30*sin(D + 90), 6, GetAngleToPlayer, 108, 0);
CreateShot01(GetX + 30*cos(D + 180), GetY + 30*sin(D + 180), 6, GetAngleToPlayer, 108, 0);
CreateShot01(GetX + 30*cos(D + 270), GetY + 30*sin(D + 270), 6, GetAngleToPlayer, 108, 0);
CreateShot01(GetX, GetY, 6, GetAngleToPlayer, 117, 0);
frame = 0;
C += 8;
D -= 8;
}
}
@DrawLoop{
SetColor(255,255,255);
SetRenderState(ALPHA);
SetTexture(imgExRumia);
SetGraphicRect(64,1,127,64);
DrawGraphic(GetX,GetY);
}
@Finalize
{
DeleteGraphic(imgExRumia);
}
}Dark Magic: 'Gentle Love' A FFF
The name is a lie. Run from the walls while in the middle, you will be forced to climb up to dodge the butterflies, dodge when you get comfortable, watch out for the love on the way back. One direction seems to be easier than the other. Maybe one arm is stronger than the other?
#TouhouDanmakufu
#Title[Dark Magic: 'Gentle Love']
#Text[Love makes people die. True story]
#Player[FREE]
#BackGround[IceMountain]
#ScriptVersion[2]
script_enemy_main{
let imgExRumia="script\ExRumia\img\ExRumia.png";
let frame = 0;
let A = 0;
let B = 0;
let C = 0;
let D = 0;
@Initialize{
SetLife(6000);
SetTimer(120);
SetInvincibility(30);
SetEffectForZeroLife(100, 0, 1);
LoadGraphic(imgExRumia);
LastSpell;
SetMovePosition02(GetCenterX, GetCenterY, 10);
LoadUserShotData("shots\CustomShots2Negative.txt");
}
@MainLoop{
SetCollisionA(GetX, GetY, 32);
frame++;
if(frame==10){
CreateShot01(GetX, GetY, 5, GetAngleToPlayer, 203, 0);
CreateShot01(GetX + 20, GetY, 5, GetAngleToPlayer, 203, 0);
CreateShot01(GetX - 20, GetY, 5, GetAngleToPlayer, 203, 0);
CreateShot01(GetX + 40, GetY, 5, GetAngleToPlayer, 203, 0);
CreateShot01(GetX - 40, GetY, 5, GetAngleToPlayer, 203, 0);
CreateShot01(GetX + 10, GetY, 5, GetAngleToPlayer, 203, 0);
CreateShot01(GetX - 10, GetY, 5, GetAngleToPlayer, 203, 0);
CreateShot01(GetX + 30, GetY, 5, GetAngleToPlayer, 203, 0);
CreateShot01(GetX - 30, GetY, 5, GetAngleToPlayer, 203, 0);
CreateLaser01(GetX, GetY, 2, A, 40, 40, 91, 0);
CreateLaser01(GetX, GetY, 2, A + 90, 40, 40, 91, 0);
CreateLaser01(GetX, GetY, 2, A + 180, 40, 40, 91, 0);
CreateLaser01(GetX, GetY, 2, A + 270, 40, 40, 91, 0);
CreateLaser01(GetX, GetY, 2, A, 40, 40, 91, 0);
CreateLaser01(GetX, GetY, 2, A + 90, 40, 40, 91, 0);
CreateLaser01(GetX, GetY, 2, A + 180, 40, 40, 91, 0);
CreateLaser01(GetX, GetY, 2, A + 270, 40, 40, 91, 0);
A += 22;
frame = 0;
}
if(frame<=11){
CreateShot01(GetX, GetY, 6, rand(180, 360), 203, 0);
CreateShot01(GetX, GetY, 6, rand(180, 360), 203, 0);
CreateShot01(GetX, GetY, 6, rand(180, 360), 203, 0);
CreateShot01(GetX, GetY, 6, rand(180, 360), 203, 0);
CreateShot01(GetX, GetY, 6, rand(180, 360), 203, 0);
}
}
@DrawLoop{
SetColor(255,255,255);
SetRenderState(ALPHA);
SetTexture(imgExRumia);
SetGraphicRect(64,1,127,64);
DrawGraphic(GetX,GetY);
}
@Finalize
{
DeleteGraphic(imgExRumia);
}
}WORK IN PROGRESS HERE, I'VE GOT MORE.
I just haven't put it on here yet. Bear with me D:
And how do you get scrollboxes? These code boxes are pretty big.
