- SpiralIDE [Taking Basic a Step Further]
- 23 Jun 2014 07:51:28 pm
- Last edited by spud2451 on 27 Jul 2014 05:54:52 pm; edited 2 times in total
SpiralIDE
SpiralIDE is a coding platform used to easily create simple to understand, well functioning TI-BASIC code. You can access SpiralIDE at www.spiralide.cf. SpiralIDE includes a load features that aren't available in vanilla TI-BASIC. These range from special tokens and loops, to named variables and even objects! With SpiralIDE you can take a complicated TI-BASIC program and write it in a matter of minutes. Because of SpiralIDE's simple and relaxed syntax bust out code quicker than ever before. SpiralIDE also includes Saving and Loading, so you can work on a project later, with out generating files that just make clutter, and take up space. so if your looking to take TI-BASIC a little further than SpiralIDE is for you.
Screenshots:
COMING SOON!!
Example:
Code:
Compiles to:
Main File:
Code:
PLAYER Object File:
Code:
SpiralIDE is a coding platform used to easily create simple to understand, well functioning TI-BASIC code. You can access SpiralIDE at www.spiralide.cf. SpiralIDE includes a load features that aren't available in vanilla TI-BASIC. These range from special tokens and loops, to named variables and even objects! With SpiralIDE you can take a complicated TI-BASIC program and write it in a matter of minutes. Because of SpiralIDE's simple and relaxed syntax bust out code quicker than ever before. SpiralIDE also includes Saving and Loading, so you can work on a project later, with out generating files that just make clutter, and take up space. so if your looking to take TI-BASIC a little further than SpiralIDE is for you.
Screenshots:
COMING SOON!!
Example:
Code:
var key = 0
while key == 0
key = getKey
end
If key == 24
Then
@PLAYER.move(-2,0)
end
If key == 25
Then
@PLAYER.move(0,-2)
end
If key == 26
Then
@PLAYER.move(2,0)
end
If key == 34
Then
@PLAYER.move(0,2)
end
sprite(playx, playy, " ")
@PLAYER.draw()
@@(PLAYER)
attribute init
var playx = 1
var playy = 1
end
attribute draw
sprite(playx, playy, "fffffff")
end
attribute move
playx = playx + &1
playy = playy + &2
end
attribute goto
playx = &1
playy = &1
end
attribute position
[playx,playy]
end
/@@
Compiles to:
Main File:
Code:
6->dim(|LSPIRL)
0->|LVARS(0)
while |LVARS(0) = 0
getKey->|LVARS(0)
End
If |LVARS(0) = 24
Then
{-2,0}->|LINPUT
"move"
prgmPLAYER
Ans
End
If |LVARS(0) = 25
Then
{0,-2}->|LINPUT
"move"
prgmPLAYER
Ans
End
If |LVARS(0) = 26
Then
{2,0}->|LINPUT
"move"
prgmPLAYER
Ans
End
If |LVARS(0) = 34
Then
{0,2}->|LINPUT
"move"
prgmPLAYER
Ans
End
For(PV,0,length( " ")-1
Text( |LVARS(2),|LVARS(1)+PV,sub( " ",PV+1,1
End
Text( |LVARS(2),|LVARS(1)+PV," "
{0}->|LINPUT
"draw"
prgmPLAYER
Ans
PLAYER Object File:
Code:
If Ans="init":Then
1->|LVARS(1)
1->|LVARS(2)
End
If Ans="draw":Then
For(PV,0,length( "fffffff")-1
Text( |LVARS(2),|LVARS(1)+PV,sub( "fffffff",PV+1,1
End
Text( |LVARS(2),|LVARS(1)+PV," "
End
If Ans="move":Then
|LVARS(1) + |LINPUT(1)->|LVARS(1)
|LVARS(2) + |LINPUT(2)->|LVARS(2)
End
If Ans="goto":Then
|LINPUT(1)->|LVARS(1)
|LINPUT(1)->|LVARS(2)
End
If Ans="position":Then
{|LVARS(1),|LVARS(2)}
End