Skip to content

Commit

Permalink
DragonForce - Through the Fire and Flames
Browse files Browse the repository at this point in the history
  • Loading branch information
Cat333Pokemon committed Aug 1, 2008
1 parent f26897d commit e7d6a0e
Showing 1 changed file with 82 additions and 0 deletions.
82 changes: 82 additions & 0 deletions Incomplete/TTFAF.BAS
Original file line number Diff line number Diff line change
@@ -0,0 +1,82 @@
CLS
PRINT "DragonForce: Through the Fire and Flames (DOS Version)"

'Settings
PLAY "T200O2P1"
'GOTO 3
'Intro riff x2
FOR i = 1 TO 2
PLAY "L48CG>C<CG>C<CG>C<CG>C<"
PLAY "L16E-<G>C<G>D<G>E-<G>F<G>D<G>"
PLAY "B-<G>G<G>G+<G>F<G>G<G>E-<G>F<G>D<G>"
NEXT i

'Hold next chord
FOR i = 1 TO 8
PLAY "L48<B->F<B->F<B->F<B->F<B->F"
NEXT i

PLAY "L48<G+>E-G+<G+>E-G+<G+>E-G+<G+>E-G+"
PLAY "L16E-<G>C<G>D<G>E-<G>F<G>D<G>"
FOR i = 1 TO 4
PLAY "L48<G>DG<G>DG<G>DG<G>DG"
NEXT i

'REPEAT START HERE
FOR i = 1 TO 2
PLAY "L48CG>C<CG>C<CG>C<CG>C<"
PLAY "L16E-<G>C<G>D<G>E-<G>F<G>D<G>"
PLAY "B-<G>G<G>G+<G>F<G>G<G>E-<G>F<G>D<G>"
NEXT i

'Hold next chord
FOR i = 1 TO 8
PLAY "L48<B->F<B->F<B->F<B->F<B->F"
NEXT i

PLAY "L48<G>DG<G>DG<G>DG<G>DG"
PLAY "L16E-<G>C<G>D<G>E-<G>F<G>D<G>"
'PRINT "HERE IT COMES!"
FOR i = 1 TO 3
PLAY "L48<G>DG<G>DG<G>DGP16"
NEXT i
PLAY "P4"

3
'The epic part!
PLAY "O3L32"
FOR i = 1 TO 2
PLAY "O1E-O3E-O1E-O3E-O1E-O3E-O1E-O3E-O1CO3CO1CO3CO1E-O3E-O1E-O3E-O1E-O3E-O1E-O3E-O1CO3CO1CO3CO1E-O3E-O1E-O3E-O1CO3CO1CO3C"
NEXT i
FOR i = 1 TO 2
PLAY "O1GO3GO1GO3GO1GO3GO1GO3GO1E-O3E-O1E-O3E-O1GO3GO1GO3GO1GO3GO1GO3GO1E-O3E-O1E-O3E-O1GO3GO1GO3GO1E-O3E-O1E-O3E-"
NEXT i
FOR i = 1 TO 2
PLAY "O1FO3FO1FO3FO1FO3FO1FO3FO1CO3CO1CO3CO1FO3FO1FO3FO1FO3FO1FO3FO1CO3CO1CO3CO1FO3FO1FO3FO1CO3CO1CO3C"
NEXT i
PLAY "O1E-O3E-O1E-O3E-O1E-O3E-O1E-O3E-O1CO3CO1CO3CO1E-O3E-O1E-O3E-O1E-O3E-O1E-O3E-O1CO3CO1CO3CO1E-O3E-O1E-O3E-O1CO3CO1CO3C"
PLAY "O1CO3CO1DO3DO1E-O3E-O1FO3FO1DO3DO1E-O3E-O1FO3FO1GO3GO1E-O3E-O1FO3FO1FO3F"
FOR i = 1 TO 5
PLAY "O1GO3G"
NEXT i
FOR i = 1 TO 2
PLAY "O1E-O3E-O1E-O3E-O1E-O3E-O1E-O3E-O1CO3CO1CO3CO1E-O3E-O1E-O3E-O1E-O3E-O1E-O3E-O1CO3CO1CO3CO1E-O3E-O1E-O3E-O1CO3CO1CO3C"
NEXT i
FOR i = 1 TO 2
PLAY "O1GO3GO1GO3GO1GO3GO1GO3GO1E-O3E-O1E-O3E-O1GO3GO1GO3GO1GO3GO1GO3GO1E-O3E-O1E-O3E-O1GO3GO1GO3GO1E-O3E-O1E-O3E-"
NEXT i
FOR i = 1 TO 2
PLAY "O1FO3FO1FO3FO1FO3FO1FO3FO1CO3CO1CO3CO1FO3FO1FO3FO1FO3FO1FO3FO1CO3CO1CO3CO1FO3FO1FO3FO1CO3CO1CO3C"
NEXT i
FOR i = 1 TO 2
PLAY "O1E-O3E-O1CO3CO0G+O2G+O0E-O2E-O0GO2GO0G+O2G+O0B-O2B-O1CO3C"
NEXT i
FOR i = 1 TO 16
PLAY "O2G+O4G+"
NEXT i

'VOCALS
4
PLAY "P4L8O2GGL4FL8FE-L4FGP4L8FE-L4FL8GL4FE-L2CP4L8FE-"
PLAY "L4FFFE-FL8GL4FP8E-FFL8FL4E-L2CP8P2"

0 comments on commit e7d6a0e

Please sign in to comment.