I think my account is still active. Thanks, I'll check it out.
» Forum
> Your Projects
just upload them. i didnt write the script itself, but I figured out how to configure it for phpBB and other boards that dont support dynamic image sources.
yeah, that I like. I need some more Avatars now (maybe I should start doing some internet searches). ALso, got a userbar dynamic set up
Let's see, it would probably be best if he made it a profile option, to have more than one pic per sig/avatar, and then adapt it for that.
swivelgames wrote:
http://rancidmoose.5gigs.com/The%20Package2.swf
What in the world? Haha that was halarious! For no reason ethar! Haha!
What in the world? Haha that was halarious! For no reason ethar! Haha!
a friend made that and asked me to host it. its gotten mixed reactions though....same sorta thing as Napoleon dynamite...either they love it or they hate, either way because it is stupid.
an update on Frog RPG
comes in at 1574 bytes without the use of any preloaded picture variables.
Thanks to kerm for his beautiful frog picture.
comes in at 1574 bytes without the use of any preloaded picture variables.
Thanks to kerm for his beautiful frog picture.
BASIC Code wrote:
:StoreGDB 1
:RecallGDB 2
:ClrDraw
:Horizontal(8
:For(H,1,15
: Text(‾1,56,1+6(H-1),sub("Frog RPG--Stats",H,1
:End
:Line(56,8,56,62
:Line(12,21,12,22
:Line(13,20,13,25
:Line(13,21,13,22,0
:
:Line(14,21,14,28
:Line(14,23,14,24,0
:Line(15,20,15,31
:Line(15,21,15,22,0
:Pt-Off(15,25
:Pt-Off(15,27
:Line(16,21,16,33
:Line(16,23,16,24,0
:Pt-Off(16,28
:Pt-Off(16,30
:Line(17,28,17,33
:Pt-Off(17,32
:Line(18,29,18,32
:Pt-Off(18,31
:Line(19,28,19,32
:Line(20,28,20,31
:Line(19,30,20,30,0
:Line(21,28,21,38
:Line(22,25,22,38
:Line(23,23,23,28
:Pt-On(23,30
:Pt-On(23,32
:Pt-On(23,34
:Pt-On(23,36
:Pt-On(23,38
:Line(24,22,24,35
:Pt-Off(24,25
:Pt-Off(24,27
:Pt-Off(24,30
:Pt-On(24,37
:Line(25,21,25,25
:Pt-On(25,27
:Pt-On(25,31
:Line(25,35,25,38
:Line(26,21,26,25
:Pt-Off(26,23
:Pt-On(26,28
:Pt-On(26,32
:Line(27,20,27,21
:Line(28,20,28,21
:Pt-On(27,26
:Line(29,21,29,25
:Pt-Off(29,23
:Line(30,21,30,25
:Line(30,31,30,33
:Line(31,22,31,24
:Line(31,28,31,30
:Line(32,23,32,24
:Line(33,25,33,27
:Line(34,28,34,38
:Line(35,28,35,29
:Pt-On(35,31
:Line(36,28,36,32
:Line(37,29,37,32
:Line(36,31,37,31,0
:Line(38,28,38,31
:Pt-On(38,33
:Line(39,21,39,33
:Pt-Off(39,23
:Pt-Off(39,24
:Pt-Off(39,29
:Pt-Off(39,31
:Pt-On(40,20
:Line(40,23,40,31
:Pt-Off(40,26
:Pt-Off(40,28
:Line(41,21,41,28
:Pt-Off(41,23
:Pt-Off(41,25
:Pt-On(42,20
:Line(42,23,42,25
:Line(43,21,43,22
:Line(22,39,24,39
:Line(32,39,34,39
:Line(20,40,24,40
:Line(32,40,36,40
:Line(18,41,21,41
:Line(23,41,22,42
:Line(35,41,38,41
:Line(15,42,19,42
:Line(36,42,41,42
:Line(13,43,17,43
:Pt-On(20,43
:Line(38,43,43,43
:Line(24,43,27,46
:Line(28,46,31,43
:Line(12,44,14,44
:Pt-On(16,44
:Pt-On(18,44
:Pt-On(32,44
:Pt-On(34,44
:Pt-On(36,44
:Line(41,44,43,44
:Line(12,45,13,45
:Pt-On(15,45
:Line(17,45,25,45
:Line(30,45,39,45
:Line(12,46,13,46
:Line(16,46,23,46
:Line(32,46,38,46
:Line(43,45,43,46
:Line(13,47,15,47
:Line(20,47,24,47
:Line(30,47,35,47
:Pt-On(37,47
:Line(40,47,42,47
:Line(16,48,19,48
:Line(24,48,25,48
:Line(29,48,31,48
:Pt-On(34,48
:Line(36,48,39,48
:Line(17,49,18,46
:Line(20,49,22,49
:Pt-On(25,49
:Line(29,49,30,49
:Line(33,49,35,49
:Line(37,49,38,49
:Line(15,50,16,50
:Pt-On(21,50
:Pt-On(23,50
:Pt-On(25,50
:Line(29,50,31,50
:Pt-On(33,50
:Pt-On(35,50
:Line(39,50,40,50
:Line(16,51,24,51
:Line(30,51,39,51
:For(H,1,4
: Text(8H,58,sub("HNGRPNTSLIFEEXP.",4(H-1)+1,4),":"
:End
:Repeat getKey=21
:End
:RecallGDB 1
:DelVar
Generated by SourceCoder, © 2005 Cemetech
:RecallGDB 2
:ClrDraw
:Horizontal(8
:For(H,1,15
: Text(‾1,56,1+6(H-1),sub("Frog RPG--Stats",H,1
:End
:Line(56,8,56,62
:Line(12,21,12,22
:Line(13,20,13,25
:Line(13,21,13,22,0
:
:Line(14,21,14,28
:Line(14,23,14,24,0
:Line(15,20,15,31
:Line(15,21,15,22,0
:Pt-Off(15,25
:Pt-Off(15,27
:Line(16,21,16,33
:Line(16,23,16,24,0
:Pt-Off(16,28
:Pt-Off(16,30
:Line(17,28,17,33
:Pt-Off(17,32
:Line(18,29,18,32
:Pt-Off(18,31
:Line(19,28,19,32
:Line(20,28,20,31
:Line(19,30,20,30,0
:Line(21,28,21,38
:Line(22,25,22,38
:Line(23,23,23,28
:Pt-On(23,30
:Pt-On(23,32
:Pt-On(23,34
:Pt-On(23,36
:Pt-On(23,38
:Line(24,22,24,35
:Pt-Off(24,25
:Pt-Off(24,27
:Pt-Off(24,30
:Pt-On(24,37
:Line(25,21,25,25
:Pt-On(25,27
:Pt-On(25,31
:Line(25,35,25,38
:Line(26,21,26,25
:Pt-Off(26,23
:Pt-On(26,28
:Pt-On(26,32
:Line(27,20,27,21
:Line(28,20,28,21
:Pt-On(27,26
:Line(29,21,29,25
:Pt-Off(29,23
:Line(30,21,30,25
:Line(30,31,30,33
:Line(31,22,31,24
:Line(31,28,31,30
:Line(32,23,32,24
:Line(33,25,33,27
:Line(34,28,34,38
:Line(35,28,35,29
:Pt-On(35,31
:Line(36,28,36,32
:Line(37,29,37,32
:Line(36,31,37,31,0
:Line(38,28,38,31
:Pt-On(38,33
:Line(39,21,39,33
:Pt-Off(39,23
:Pt-Off(39,24
:Pt-Off(39,29
:Pt-Off(39,31
:Pt-On(40,20
:Line(40,23,40,31
:Pt-Off(40,26
:Pt-Off(40,28
:Line(41,21,41,28
:Pt-Off(41,23
:Pt-Off(41,25
:Pt-On(42,20
:Line(42,23,42,25
:Line(43,21,43,22
:Line(22,39,24,39
:Line(32,39,34,39
:Line(20,40,24,40
:Line(32,40,36,40
:Line(18,41,21,41
:Line(23,41,22,42
:Line(35,41,38,41
:Line(15,42,19,42
:Line(36,42,41,42
:Line(13,43,17,43
:Pt-On(20,43
:Line(38,43,43,43
:Line(24,43,27,46
:Line(28,46,31,43
:Line(12,44,14,44
:Pt-On(16,44
:Pt-On(18,44
:Pt-On(32,44
:Pt-On(34,44
:Pt-On(36,44
:Line(41,44,43,44
:Line(12,45,13,45
:Pt-On(15,45
:Line(17,45,25,45
:Line(30,45,39,45
:Line(12,46,13,46
:Line(16,46,23,46
:Line(32,46,38,46
:Line(43,45,43,46
:Line(13,47,15,47
:Line(20,47,24,47
:Line(30,47,35,47
:Pt-On(37,47
:Line(40,47,42,47
:Line(16,48,19,48
:Line(24,48,25,48
:Line(29,48,31,48
:Pt-On(34,48
:Line(36,48,39,48
:Line(17,49,18,46
:Line(20,49,22,49
:Pt-On(25,49
:Line(29,49,30,49
:Line(33,49,35,49
:Line(37,49,38,49
:Line(15,50,16,50
:Pt-On(21,50
:Pt-On(23,50
:Pt-On(25,50
:Line(29,50,31,50
:Pt-On(33,50
:Pt-On(35,50
:Line(39,50,40,50
:Line(16,51,24,51
:Line(30,51,39,51
:For(H,1,4
: Text(8H,58,sub("HNGRPNTSLIFEEXP.",4(H-1)+1,4),":"
:End
:Repeat getKey=21
:End
:RecallGDB 1
:DelVar
Generated by SourceCoder, © 2005 Cemetech
KermMartian wrote:
Wouldn't you be better off with a pic var then?!
no, because I dont want people to have to use pregenerated files that can get overwritten by another file.
KermMartian wrote:
Aha. Very intelligent of you. And I see some optimizations I'll make tomorrow.
thank you.
Quote:
:I→C:J→U
:length(Str4
:Ans/(2+2(Ans>16)+4(Ans>64→Z
:If min(Ans≠{8,16,32
:Then
:"FFC3A59999A5C3FF→Str4
:8→Z
:End
:For(θ,1,length(Str4
:inString("123456789ABCDEF",sub(Str4,θ,1
:If 7<Ans
:Pxl-On(U,C
:If 3<8fPart(Ans/8
:Pxl-On(U,C+1
:If 1<4fPart(Ans/4
:Pxl-On(U,C+2
:If fPart(Ans/2
:Pxl-On(U,C+3
:C+4→C
:U+(C=I+Z→U
:If C=I+Z:I→C:End
:length(Str4
:Ans/(2+2(Ans>16)+4(Ans>64→Z
:If min(Ans≠{8,16,32
:Then
:"FFC3A59999A5C3FF→Str4
:8→Z
:End
:For(θ,1,length(Str4
:inString("123456789ABCDEF",sub(Str4,θ,1
:If 7<Ans
:Pxl-On(U,C
:If 3<8fPart(Ans/8
:Pxl-On(U,C+1
:If 1<4fPart(Ans/4
:Pxl-On(U,C+2
:If fPart(Ans/2
:Pxl-On(U,C+3
:C+4→C
:U+(C=I+Z→U
:If C=I+Z:I→C:End
That is the code to the newest hex2sprite that will be appearing up on ticalc.org. Just write the frog pic out in hex, store to Str4, set the position of the variables I and J, and you should be set.
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
» Go to Registration page
» Goto page Previous 1, 2, 3, 4, 5, 6 Next
» View previous topic :: View next topic
» View previous topic :: View next topic
Page 4 of 6
» All times are UTC - 5 Hours
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum
Advertisement