Author Topic: Random Project. Come join in.  (Read 9173 times)

0 Members and 1 Guest are viewing this topic.

Offline Happybobjr

  • James Oldiges
  • LV11 Super Veteran (Next: 3000)
  • ***********
  • Posts: 2325
  • Rating: +128/-20
  • Howdy :)
    • View Profile
Re: Random Project. Come join in.
« Reply #15 on: December 13, 2011, 09:13:47 pm »
Rule Change!
* please put comments next to things that people normaly can't understand.  Like the Asm(###########) :P
also, please make sure you don't give it errors, and make it so i won't clear ram :P


Code: [Select]
:.THEGAME
:.SMILE SPRITE
:[3C42A581A599423C→Pic1S
:
:For (A,0,5)
:Text(0,A*6,"You will lose the Game...")
:End
:
:Repeat Getkey(15):End
:Asm(EF4045
:GetCalc("appvOMNIMAGA",1337)→Pic666
:Repeat Getkey(15)
:Bitmap(Pic666)
:Displaygraph
:If getKey(54)
:TY(
:End
:End
:Return
:LBL TY
:Text(1,8,"You've exploded, fool!"
Pause 1800
ClrDraw
[FEFDFBF7EFDFBD7F]->Str1
Line(0,63,95,63   
Repeat getKey(15) 
For(F,L6+12,L6+767
{F} and {rand^8+Str1}->{F-12}
End
DispGraph
End
:Return
« Last Edit: December 13, 2011, 09:14:06 pm by Happybobjr »
School: East Central High School
 
Axe: 1.0.0
TI-84 +SE  ||| OS: 2.53 MP (patched) ||| Version: "M"
TI-Nspire    |||  Lent out, and never returned
____________________________________________________________

Offline Yeong

  • Not a bridge
  • LV12 Extreme Poster (Next: 5000)
  • ************
  • Posts: 3739
  • Rating: +278/-12
  • Survivor of Apocalypse
    • View Profile
Re: Random Project. Come join in.
« Reply #16 on: December 13, 2011, 09:16:13 pm »
gotcha!
Code: [Select]
:.THEGAME
:.SMILE SPRITE
:[3C42A581A599423C→Pic1S
:
:For (A,0,5)
:Text(0,A*6,"You will lose the Game...")
:End
:DispGraph
:Text(0,0,"Eat Netham
:DispGraph
:Repeat Getkey(15):End
:.Clears the Screen
:Asm(EF4045
:GetCalc("appvOMNIMAGA",1337)→Pic666
:Repeat Getkey(15)
:Bitmap(Pic666)
:Displaygraph
:If getKey(54)
:TY(
:End
:End
:Return
:LBL TY
:Text(1,8,"You've exploded, fool!"
Pause 1800
ClrDraw
[FEFDFBF7EFDFBD7F]->Str1
Line(0,63,95,63   
Repeat getKey(15) 
For(F,L6+12,L6+767
{F} and {rand^8+Str1}->{F-12}
End
DispGraph
End
:Return
Sig wipe!

Offline Happybobjr

  • James Oldiges
  • LV11 Super Veteran (Next: 3000)
  • ***********
  • Posts: 2325
  • Rating: +128/-20
  • Howdy :)
    • View Profile
Re: Random Project. Come join in.
« Reply #17 on: December 13, 2011, 09:18:45 pm »
Thanks!!!

Code: [Select]
:.THEGAME
:.SMILE SPRITE
:[3C42A581A599423C→Pic1S
:
:Fix 5
:
:For (A,0,5)
:Text(0,A*6,"You will lose the Game...")
:End
:DispGraph
:Text(0,0,"Eat Netham
:DispGraph
:Repeat Getkey(15):End
:.Clears the Screen
:Asm(EF4045
:GetCalc("appvOMNIMAGA",1337)→Pic666
:Repeat Getkey(15)
:Bitmap(Pic666)
:Displaygraph
:If getKey(54)
:TY(
:End
:End
:
:Fix 4
:Return
:LBL TY
:Text(1,8,"You've exploded, fool!"
:Pause 1800
:ClrDraw
:[FEFDFBF7EFDFBD7F]->Str1
:Line(0,63,95,63   
:Repeat getKey(15) 
:For(F,L6+12,L6+767
:{F} and {rand^8+Str1}->{F-12}
:End
:DispGraph
:End
:
:Fix 4
:
:Return
School: East Central High School
 
Axe: 1.0.0
TI-84 +SE  ||| OS: 2.53 MP (patched) ||| Version: "M"
TI-Nspire    |||  Lent out, and never returned
____________________________________________________________

Offline epic7

  • Chopin!
  • LV11 Super Veteran (Next: 3000)
  • ***********
  • Posts: 2200
  • Rating: +135/-8
  • I like robots
    • View Profile
Re: Random Project. Come join in.
« Reply #18 on: December 13, 2011, 09:25:16 pm »
Code: [Select]
:.THEGAME
:.SMILE SPRITE
:[3C42A581A599423C→Pic1S
:
:Fix 5
:
:For (A,0,5)
:Text(0,A*6,"You will lose the Game...")
:End
:DispGraph
:Text(0,64,"Eat Netham
:DispGraph
:Repeat Getkey(15):End
:.Clears the Screen
:Asm(EF4045
:.Will appvOMNIMAGA exist?
:GetCalc("appvOMNIMAGA",1337)→Pic666
:Repeat Getkey(15)
:Bitmap(X,Y,Pic666)
:Dispgraph
:If getKey(54)
:TY(
:End
:If getKey(3)
:LOL()
:End
:
:Fix 4
:Return
:LBL TY
:Text(1,8,"You've exploded, fool!"
:Pause 1800
:ClrDraw
:.Code for flames incoming
:[FEFDFBF7EFDFBD7F]->Str1
:Line(0,63,95,63   
:Repeat getKey(15) 
:For(F,L6+12,L6+767
:{F} and {rand^8+Str1}->{F-12}
:End
:DispGraph
:End
:Fix 4
:Return
:LOL()
:. Jetpack dude!
:[0004EAF430C84080]->Pic7
:64->Y
:0->X
:Repeat Y<<1
:Y--
:X++
:Pt-On(X,Y,Pic7)
:DispGraphClrDraw
:End
:Return

Offline Yeong

  • Not a bridge
  • LV12 Extreme Poster (Next: 5000)
  • ************
  • Posts: 3739
  • Rating: +278/-12
  • Survivor of Apocalypse
    • View Profile
Re: Random Project. Come join in.
« Reply #19 on: December 13, 2011, 09:27:29 pm »

Code: [Select]
:.THEGAME
:.SMILE SPRITE
:[3C42A581A599423C→Pic1S
:
:Fix 5
:
:For (A,0,5)
:Text(0,A*6,"You will lose the Game...")
:End
:DispGraph
:Text(0,64,"Eat Netham
:DispGraph
:Repeat Getkey(15):End
:.Clears the Screen
:Asm(EF4045
:.Will appvOMNIMAGA exist?
:GetCalc("appvOMNIMAGA",1337)→Pic666
:Repeat Getkey(15)
:Bitmap(X,Y,Pic666)
:Dispgraph
:If getKey(54)
:TY(
:End
:If getKey(3)
:LOL()
:End
:Lbl L1
:ClrDraw
:Text(0,0,"YOU ARE A SMILEY
:Text(0,8,"AVOID PIXEL!
:Pause 2000:20→A→B:ClrDraw
:Repeat getKey(15)
:Pt-Off(A,B,Pic1S
:
:DispGraphClrDraw
:
:End
:
:
:Fix 4
:Return
:LBL TY
:Text(1,8,"You've exploded, fool!"
:Pause 1800
:ClrDraw
:.Code for flames incoming
:[FEFDFBF7EFDFBD7F]->Str1
:Line(0,63,95,63   
:Repeat getKey(15) 
:For(F,L6+12,L6+767
:{F} and {rand^8+Str1}->{F-12}
:End
:DispGraph
:End
:Fix 4
:Return
:LOL()
:. Jetpack dude!
:[0004EAF430C84080]->Pic7
:64->Y
:0->X
:Repeat Y<<1
:Y--
:X++
:Pt-On(X,Y,Pic7)
:DispGraphClrDraw
:End
:Return

Sig wipe!

Offline aeTIos

  • Nonbinary computing specialist
  • LV12 Extreme Poster (Next: 5000)
  • ************
  • Posts: 3915
  • Rating: +184/-32
    • View Profile
    • wank.party
Re: Random Project. Come join in.
« Reply #20 on: December 15, 2011, 09:40:01 am »
Hum, Would be nice if this turned out like a playable game :p
I'm not a nerd but I pretend:

Offline Happybobjr

  • James Oldiges
  • LV11 Super Veteran (Next: 3000)
  • ***********
  • Posts: 2325
  • Rating: +128/-20
  • Howdy :)
    • View Profile
Re: Random Project. Come join in.
« Reply #21 on: December 15, 2011, 01:04:14 pm »
that was what i initialy hoped for :P
School: East Central High School
 
Axe: 1.0.0
TI-84 +SE  ||| OS: 2.53 MP (patched) ||| Version: "M"
TI-Nspire    |||  Lent out, and never returned
____________________________________________________________

Offline epic7

  • Chopin!
  • LV11 Super Veteran (Next: 3000)
  • ***********
  • Posts: 2200
  • Rating: +135/-8
  • I like robots
    • View Profile
Re: Random Project. Come join in.
« Reply #22 on: December 15, 2011, 04:00:12 pm »
Will appvOMNIMAGA exist tho? Or add something in there to create it :P

Also can a bitmap be 1337 bytes?

Offline saintrunner

  • Custom Spriter: You ask it! I'll Make it!
  • LV10 31337 u53r (Next: 2000)
  • **********
  • Posts: 1787
  • Rating: +115/-11
  • Flogging Molly
    • View Profile
    • Jonny K Music
Re: Random Project. Come join in.
« Reply #23 on: December 15, 2011, 04:10:32 pm »
I think that makes it exist
My Sprites Thread   :Updated often :) for your viewing pleasure

GAMES:

Offline epic7

  • Chopin!
  • LV11 Super Veteran (Next: 3000)
  • ***********
  • Posts: 2200
  • Rating: +135/-8
  • I like robots
    • View Profile
Re: Random Project. Come join in.
« Reply #24 on: December 15, 2011, 04:15:35 pm »
Oh, right.
* epic7 gets getcalc mixed up

But will that work with the bitmap?

Offline saintrunner

  • Custom Spriter: You ask it! I'll Make it!
  • LV10 31337 u53r (Next: 2000)
  • **********
  • Posts: 1787
  • Rating: +115/-11
  • Flogging Molly
    • View Profile
    • Jonny K Music
Re: Random Project. Come join in.
« Reply #25 on: December 15, 2011, 04:16:31 pm »
To be honest, I don't know what parts of this program will work, or what it does for that matter, lol
My Sprites Thread   :Updated often :) for your viewing pleasure

GAMES:

Offline epic7

  • Chopin!
  • LV11 Super Veteran (Next: 3000)
  • ***********
  • Posts: 2200
  • Rating: +135/-8
  • I like robots
    • View Profile
Re: Random Project. Come join in.
« Reply #26 on: December 15, 2011, 04:24:18 pm »
Code: [Select]
:.THEGAME
:.SMILE SPRITE
:[3C42A581A599423C→Pic1S
:.Bitmap
[18181DC00038E000F9FF80FFFFC05FFFF00F7C180E7C0C1EFC6E1EFC6E3E7C0E7FBE1F7F9FFF7F1FFE7F43FC7FC2D87FD8023FD25E3FF3FE1FFFFC0FFFF807FFF003FFE000FFC0003F00]->Pic666
:Fix 5
:For (A,0,5)
:Text(0,A*6,"You will lose the Game...")
:End
:DispGraph
:Text(0,64,"Eat Netham
:DispGraph
:Pause 1234
:.Clears the Screen
:Asm(EF4045
:0->X
:Repeat Getkey(15)
:.Randomize coordinates
:rand^41->Y
:Bitmap(X,Y,Pic666)
:Dispgraph
:If getKey(42)
:TEH()
:If getKey(54)
:TY()
:End
:If getKey(3)
:LOL()
:End
:If getKey(41)
:L1()
:End
:Lbl L1
:ClrDraw
:Text(0,0,"YOU ARE A SMILEY
:Text(0,8,"FLY AROUND!
:Pause 2000:20→A→B:ClrDraw
:Repeat getKey(15)
:Pt-On(A,B,Pic1S
:DispGraphClrDraw
:rand^89->A
:Rand^57->B
:Pause 123
:End
:Return
:LBL TY
:Text(1,8,"You've exploded, fool!"
:Pause 1800
:ClrDraw
:.Code for flames incoming
:[FEFDFBF7EFDFBD7F]->Str1
:Line(0,63,95,63   
:Repeat getKey(15) 
:For(F,L6+12,L6+767
:{F} and {rand^8+Str1}->{F-12}
:End
:DispGraph
:End
:Fix 4
:Return
:LOL()
:. Jetpack dude!
:[0004EAF430C84080]->Pic7
:64->Y
:0->X
:Repeat Y<<1
:Y--
:X++
:Pt-On(X,Y,Pic7)
:DispGraphClrDraw
:End
:Return
:Lbl TEH
:. Put something here!
:Return
« Last Edit: December 15, 2011, 04:24:58 pm by epic7 »

Offline Freyaday

  • The One And Only Serial Time Killing Catboy-Capoeirista-Ballerino
  • LV10 31337 u53r (Next: 2000)
  • **********
  • Posts: 1970
  • Rating: +128/-15
  • I put on my robe and pixel hat...
    • View Profile
Re: Random Project. Come join in.
« Reply #27 on: December 16, 2011, 02:30:14 am »
Code: [Select]
:.THEGAME
:.SMILE SPRITE
:[3C42A581A599423C→Pic1S
:.Bitmap
[18181DC00038E000F9FF80FFFFC05FFFF00F7C180E7C0C1EFC6E1EFC6E3E7C0E7FBE1F7F9FFF7F1FFE7F43FC7FC2D87FD8023FD25E3FF3FE1FFFFC0FFFF807FFF003FFE000FFC0003F00]->Pic666
:Fix 5
:For (A,0,5)
:Text(0,A*6,"You will lose the Game...")
:End
:DispGraph
:Text(0,64,"Eat Netham
:DispGraph
:Pause 1234
:.Clears the Screen
:Asm(EF4045
:0->X
:Repeat Getkey(15)
:.Randomize coordinates
:rand^41->Y
:Bitmap(X,Y,Pic666)
:Dispgraph
:If getKey(42)
:TEH()
:If getKey(54)
:TY()
:End
:If getKey(3)
:LOL()
:End
:If getKey(41)
:L1()
:End
:Lbl L1
:ClrDraw
:Text(0,0,"YOU ARE A SMILEY
:Text(0,8,"FLY AROUND!
:Pause 2000:20→A→B:ClrDraw
:Repeat getKey(15)
:Pt-On(A,B,Pic1S
:DispGraphClrDraw
:rand^89->A
:Rand^57->B
:Pause 123
:End
:Return
:LBL TY
:Text(1,8,"You've exploded, fool!"
:Pause 1800
:ClrDraw
:.Code for flames incoming
:[FEFDFBF7EFDFBD7F]->Str1
:Line(0,63,95,63   
:Repeat getKey(15) 
:For(F,L6+12,L6+767
:{F} and {rand^8+Str1}->{F-12}
:End
:DispGraph
:End
:Fix 4
:Return
:LOL()
:. Jetpack dude!
:[0004EAF430C84080]->Pic7
:64->Y
:0->X
:Repeat Y<<1
:Y--
:X++
:Pt-On(X,Y,Pic7)
:DispGraphClrDraw
:End
:Return
:Lbl TEH
:."You pressed tyop"->Str1TEH
:."Teh!"->Str1TEH
:"TEH HAS BEEN SELECTED. DIE, MORTAL"->Str1TEH
:.DECIDE WHICH TO USE LATER. PERHAPS CONDUCT POLL
:.SPACES WITH WIDTH 4 TO 1 IN SMALL FONT
:[04EDEE20]->Str1SP
:0->r1
For(Q,0,length(Str1TEH))
:0->r2
:{Q+Str1TEH}->r1
:For(R,0,3)
:{R+Str1SP}->r2
:Text(Q*4,0,r1
:Text(Q*4+R,0,r2
:DispGraph
:End
:End
In other news, Frey continues kicking unprecedented levels of ass.
Proud member of LF#N--Lolis For #9678B6 Names


I'm a performer at heart; I stole it last week.
My Artwork!