Mickey Head
This is an archived, read-only copy of the United-TI subforum , including posts and topic from May 2003 to April 2012. If you would like to discuss any of the topics in this forum, you can visit Cemetech's TI-BASIC subforum. Some of these topics may also be directly-linked to active Cemetech topics. If you are a Cemetech member with a linked United-TI account, you can link United-TI topics here with your current Cemetech topics.

This forum is locked: you cannot post, reply to, or edit topics. TI-Basic => TI-BASIC
Mickey Head
United-TI Archives -> TI-Basic
 
    » Goto page 1, 2  Next
» View previous topic :: View next topic  
Author Message
Brazucs
I have no idea what my avatar is.


Super Elite (Last Title)


Joined: 31 Mar 2004
Posts: 3349
Posted: 11 May 2004 12:39:23 pm    Post subject:
Check this out, I thought it was pretty cool. It draws Mickey!!
Note: sqrt = square root


Code:
ClrDraw
6.5 -> Xmin
33.5 -> Xmax
40 -> Xscl
8 -> Ymin
32 -> Ymax
40 -> Yscl
1 -> Xres
Shade(28- sqrt(16-(X-28)^2),28+ sqrt(16-(X-28)^2))
Shade(28- sqrt(16-(X-12)^2),28+ sqrt(16-(X-12)^2))
Shade(14-(1/2) sqrt(4-(X-20)^2),14+.5 sqrt(4-(X-20)^2))
Shade(18-(3/2) sqrt(1-(X-18)^2),18+1.5 sqrt(1-(X-18)^2))
Shade(18-(3/2) sqrt(1-(X-22)^2),18+1.5 sqrt(1-(X-22)^2))
Shade(14+(2/3) sqrt(9-(X-27)^2),20+(7/8) sqrt(64-(X-20)^2))
Shade(14+(2/3) sqrt(9-(X-13)^2),20+(7/8) sqrt(64-(X-20)^2))
Shade(20+2 sqrt(4-(X-22)^2),20+(7/8) sqrt(64-(X-20)^2))
Shade(20+2 sqrt(4-(X-18)^2),20+(7/8) sqrt(64-(X-20)^2))
DrawF 18.5+(5/2) sqrt(1-(X-22)^2)
DrawF 18.5-(5/2) sqrt(1-(X-22)^2)
DrawF 18.5+(5/2) sqrt(1-(X-18)^2)
DrawF 18.5-(5/2) sqrt(1-(X-18)^2)
DrawF 15+(1/3) sqrt(9-(X-20)^2)
DrawF 22+ sqrt(1-(X-22)^2)
DrawF 22+ sqrt(1-(X-18)^2)
DrawF 14-(3/5) sqrt(100-(X-20)^2)
DrawF 10-(1/2) sqrt(16-(X-20)^2
DrawF 14+(1/2) sqrt(1-(X-27)^2)
DrawF 14+(1/2) sqrt(1-(X-13)^2)
Shade(12-(3/4) sqrt(16-(X-20)^2),14.5-(3/7) sqrt(49-(X-20)^2))


Edit: TI-GRAPH LINK VERSION:


Code:
ClrDraw
6.5üXmin
33.5üXmax
40üXscl
8üYmin
32üYmax
40üYscl
1üXres
Shade(28-ð(16-(X-28)Ü),28+ð(16-(X-28)Ü))
Shade(28-ð(16-(X-12)Ü),28+ð(16-(X-12)Ü))
Shade(14-(1/2)ð(4-(X-20)Ü),14+.5ð(4-(X-20)Ü))
Shade(18-(3/2)ð(1-(X-18)Ü),18+1.5ð(1-(X-18)Ü))
Shade(18-(3/2)ð(1-(X-22)Ü),18+1.5ð(1-(X-22)Ü))
Shade(14+(2/3)ð(9-(X-27)Ü),20+(7/8)ð(64-(X-20)Ü))
Shade(14+(2/3)ð(9-(X-13)Ü),20+(7/8)ð(64-(X-20)Ü))
Shade(20+2ð(4-(X-22)Ü),20+(7/8)ð(64-(X-20)Ü))
Shade(20+2ð(4-(X-18)Ü),20+(7/8)ð(64-(X-20)Ü))
DrawF 18.5+(5/2)ð(1-(X-22)Ü)
DrawF 18.5-(5/2)ð(1-(X-22)Ü)
DrawF 18.5+(5/2)ð(1-(X-18)Ü)
DrawF 18.5-(5/2)ð(1-(X-18)Ü)
DrawF 15+(1/3)ð(9-(X-20)Ü)
DrawF 22+ð(1-(X-22)Ü)
DrawF 22+ð(1-(X-18)Ü)
DrawF 14-(3/5)ð(100-(X-20)Ü)
DrawF 10-(1/2)ð(16-(X-20)Ü
DrawF 14+(1/2)ð(1-(X-27)Ü)
DrawF 14+(1/2)ð(1-(X-13)Ü)
Shade(12-(3/4)ð(16-(X-20)Ü),14.5-(3/7)ð(49-(X-20)Ü))


Last edited by Guest on 11 May 2004 12:40:35 pm; edited 1 time in total
Back to top
leofox
INF student


Super Elite (Last Title)


Joined: 11 Apr 2004
Posts: 3562
Posted: 11 May 2004 01:23:52 pm    Post subject:
do you have a screenshot?
Back to top
Brazucs
I have no idea what my avatar is.


Super Elite (Last Title)


Joined: 31 Mar 2004
Posts: 3349
Posted: 11 May 2004 10:41:16 pm    Post subject:
leofox wrote:
do you have a screenshot?
Back to top
Ray Kremer


Member


Joined: 16 Feb 2004
Posts: 237
Posted: 12 May 2004 02:34:05 am    Post subject:
That's been around for at least ten years.
Back to top
DarkerLine
ceci n'est pas une |


Super Elite (Last Title)


Joined: 04 Nov 2003
Posts: 8328
Posted: 12 May 2004 04:23:40 pm    Post subject:
And is in need of some heavy optimization.
Back to top
Keith Pierce


Advanced Member


Joined: 02 Feb 2004
Posts: 411
Posted: 13 May 2004 12:17:49 pm    Post subject:
Did he make it or find it somewhere? That picture looks familiar.
Back to top
DarkerLine
ceci n'est pas une |


Super Elite (Last Title)


Joined: 04 Nov 2003
Posts: 8328
Posted: 13 May 2004 04:58:46 pm    Post subject:
Keith Pierce wrote:
Did he make it or find it somewhere?

Probably found it, if it's been around for 10 years.
Quote:
That picture looks familiar.

'Course it does, it's Mickey!!
Back to top
Jeremiah Walgren
General Operations Director


Know-It-All


Joined: 24 May 2003
Posts: 1937
Posted: 13 May 2004 06:15:09 pm    Post subject:
Mickey's awesome.

I remember the sierpinski (sp?) triangle program from the 83 Plus manual. That was...entertaining...the first time I ran it.
Back to top
X1011
10100111001


Active Member


Joined: 14 Nov 2003
Posts: 657
Posted: 13 May 2004 07:35:19 pm    Post subject:
theres an asm version, it does it in about 3 seconds.
Back to top
Jeremiah Walgren
General Operations Director


Know-It-All


Joined: 24 May 2003
Posts: 1937
Posted: 13 May 2004 10:48:20 pm    Post subject:
Indeed there is. But I didn't know about that when I was trying to type the basic program in...
Back to top
Keith Pierce


Advanced Member


Joined: 02 Feb 2004
Posts: 411
Posted: 14 May 2004 01:30:44 pm    Post subject:
What site would you find the mickey face at? Besides here!
Back to top
DarkerLine
ceci n'est pas une |


Super Elite (Last Title)


Joined: 04 Nov 2003
Posts: 8328
Posted: 14 May 2004 03:40:16 pm    Post subject:
Jeremiah Walgren wrote:
I remember the sierpinski (sp?) triangle program from the 83 Plus manual.  That was...entertaining...the first time I ran it.

That was slow. As long as they're putting that in the manual, why not optimize it?!?

Quote:
theres an asm version, it does it in about 3 seconds.

I can draw a Mickey for you using Basic in less than a second.

Code:
RclPic 1
Back to top
Arcane Wizard
`semi-hippie`


Super Elite (Last Title)


Joined: 02 Jun 2003
Posts: 8993
Posted: 14 May 2004 03:49:56 pm    Post subject:
It's RecallPic 1 not RclPic 1
Back to top
Jeremiah Walgren
General Operations Director


Know-It-All


Joined: 24 May 2003
Posts: 1937
Posted: 14 May 2004 03:53:55 pm    Post subject:
On the TI-89, it's RclPic 1.
Back to top
DarkerLine
ceci n'est pas une |


Super Elite (Last Title)


Joined: 04 Nov 2003
Posts: 8328
Posted: 14 May 2004 04:02:06 pm    Post subject:
Yes, I need to get a new 83-series calculator FAST!
Back to top
Jeremiah Walgren
General Operations Director


Know-It-All


Joined: 24 May 2003
Posts: 1937
Posted: 14 May 2004 04:08:10 pm    Post subject:
Why didn't you just keep a copy of your old one's ROM?
Back to top
Arcane Wizard
`semi-hippie`


Super Elite (Last Title)


Joined: 02 Jun 2003
Posts: 8993
Posted: 14 May 2004 04:17:14 pm    Post subject:
I'll send you mine if you want.
Back to top
Jeremiah Walgren
General Operations Director


Know-It-All


Joined: 24 May 2003
Posts: 1937
Posted: 14 May 2004 04:18:57 pm    Post subject:
That would be slightly illegal... Neutral
Back to top
DarkerLine
ceci n'est pas une |


Super Elite (Last Title)


Joined: 04 Nov 2003
Posts: 8328
Posted: 14 May 2004 04:32:53 pm    Post subject:
Jeremiah Walgren wrote:
Why didn't you just keep a copy of your old one's ROM?

I didn't have VTI then, never thought I'd need it. I can get a ROM from a school calculator, but I find it inconvenient to use VTI (3.0 alpha can't do much).
Back to top
Jeremiah Walgren
General Operations Director


Know-It-All


Joined: 24 May 2003
Posts: 1937
Posted: 15 May 2004 11:50:21 am    Post subject:
Quote:
I can get a ROM from a school calculator, but I find it inconvenient to use VTI (3.0 alpha can't do much).

You wouldn't need VTI 3.0 if you can do things right. Check your PM's.
Back to top
Display posts from previous:   
Register to Join the Conversation
Have your own thoughts to add to this or any other topic? Want to ask a question, offer a suggestion, share your own programs and projects, upload a file to the file archives, get help with calculator and computer programming, or simply chat with like-minded coders and tech and calculator enthusiasts via the site-wide AJAX SAX widget? Registration for a free Cemetech account only takes a minute.

» Go to Registration page
Mickey Head
    » Goto page 1, 2  Next
» View previous topic :: View next topic  
Page 1 of 2 » All times are UTC - 5 Hours

 

Advertisement