So Angry that I made this before the competition:
Code:
Idea for the screensaver:
TI-Basic
every 20 cycles or so change the screensaver
use the home screen
come up with gentile looking but unique screen savers
have it within one Repeat loop of Getkey to make it easily escapable
(ideas so far):
Center screen ripple
night sky with twinkling stars
Code:
:"Best used with inverted colors
:"0000300330030000000003033030000000000033330000000003300330033000300333033033300303003333333300300030033333300300333333333333333333333333333333330030033333300300030033333333003030033303303330030003300330033000000000333300000000000303303000000000300330030000"
ClrHome
DelVar L₁
1→L₁(1):3→L₁(2):7→L₁(3):12→L₁(4):18→L₁(5):23→L₁(6):1→L₁(7):3→L₁(8):7→L₁(9):9→L₁(10):10→L₁(11):5→L₁(12)
While getKey≠105
Output(10,1,"XXXIXXXXXIXXXXXIXXXXXIXXXX
Output(9,1,"IEEEEEIEEEEEIEEEEEIEEEEEIE
Output(8,1,"XX I XXX I XXX I XXX I XXX
Output(7,1,"I EEE I EEE I EEE I EEE I
Output(6,1,"X I X I X I X I X
Output(5,1," E E E E
For(M,1,4
Output(M,1,"
End
For(M,1,6
Output(L₁(M+6),L₁(M),"*
(randInt(1,1)+L₁(M))→A
If A≤0:26→A
If A≥27:1→A
A→L₁(M)
End
For(M,7,12
(L₁(M)+1)→A:If A=11:1→A
A→L₁(M)
End
End
Idea for the screensaver:
TI-Basic
every 20 cycles or so change the screensaver
use the home screen
come up with gentile looking but unique screen savers
have it within one Repeat loop of Getkey to make it easily escapable
(ideas so far):
Center screen ripple
night sky with twinkling stars
