Show Posts

This section allows you to view all posts made by this member. Note that you can only see posts made in areas you currently have access to.


Messages - Eeems

Pages: 1 ... 330 331 [332] 333 334 ... 370
4966
Introduce Yourself! / Re: Harro thar
« on: July 22, 2009, 03:28:28 pm »
Quote
I do have the power to rob everyone of their nuts
This may be worse than nitacku and netham's sausages.
I have no idea what you're talking about...
Face it you messed up.
quote pyramid ftw!!
I think I messed up too...

4967
The Blue Platform / Re: updates
« on: July 21, 2009, 09:47:56 pm »
I've been working on the maps and making the subroutines work better. I figured out a way to use an edited version of the macro system to cut around 300 bytes off my text input subroutine (it uses the graphscreen instead of teh homescreen) so instead of just over 700 bytes it is now just over 400 bytes.
I also added a few real(7,0)'s to the main code to try and keep the runindicator off. for some reason though, it doesn't like to stay off, so it will sometimes be off in one part of the code, and the next time you come back to it, it will be on again. oh well I got it to stay off around 70% of the time, so the gameplay looks more professional then before.

4968
Introduce Yourself! / Re: Harro thar
« on: July 21, 2009, 08:21:09 pm »
you want to stay on simples good side...

4969
News / Re: #omnimaga relocates back to EfNet
« on: July 21, 2009, 06:03:26 pm »
I was kicked then the next day somebody banned me with that message, so I can't even connect to the channel

4970
TI Z80 / Re: Map Editor Code
« on: July 21, 2009, 02:54:20 pm »
ok, I updated the code again, now you don't have to scroll through all the tiles to reach one, you can now just press [trace] and you can then select the right tile like when you are selecting an event.
Code: [Select]
:AxesOff
:SetUpEditor
:rand(3
:If getKey=15:Goto 1
:{X,Y,V,I→L2
:{16,22→dim([A]
:[A]→[B]
:DelVar SDelVar CDelVar DDelVar GDelVar LDelVar MDelVar J
:4→A:6→B
:real(0,0
:Repeat K=15
:real(2,1,C,D,22,16,0,12,0,12,13,0,8,0
:If J and Z and C<L2(1) and D<L2(2
:Then
:identity(5,"FFC3A59999A5C3FF",8(L2(1)-C)-8,8(L2(2)-D)-8,1,8,0,0,0
:End
:If M and dim(L4
:Then
:For(θ,1,dim(L4),4)
:If L4(θ+2)>C and D<L4(θ+3
:real(1,8(L4(θ+2)-C)-8,8(L4(θ+3)-D)-8,1,8,13,L4(θ),8L4(θ+1),0,0,0
:End:End
:real(12,5,8B-9,8A-9,8B,8A,0
:real(12,2,8B-9,8A-9,8B-9,8A-9,0
:real(12,2,8B,8A,8B,8A,0
:real(12,2,8B,8A-9,8B,8A-9,0
:real(12,2,8B-9,8A,8B-9,8A,0
:If L
:Then
:Text(0,0,"(",B+C,",",A+D,")
:Text(6,0,"(",S,"/",[A](A+D,B+C),")
:Text(12,0,"Events:
:Text(18,0,"Enemy:
:If M:Then
:Text(12,24,"on
:Else
:Text(12,24,"off
:End
:If J:Then
:Text(18,24,"on
:Else
:Text(18,24,"off
:End:End
:real(6
:If K=21 or G:Then:[B]→[A]:Else:[A]→[B]:End
:Repeat Ans
:getKey:End
:Ans→K
:If K=45:Then
:Fill 0,[A]
:[A]→[B]
:Else
:If K=23:Then
:0→[A](A+D,B+C
:Else
:If K=83:Then
:0→C:0→D
:Else
:If K=14:Then
:1→X:1→Y
:Repeat 21=K or K=15
:real(3,13,0,0
:Repeat Ans
:real(12,5,8X-8,8Y-8,8X-1,8Y-1,1
:real(12,5,8X-8,8Y-8,8X-1,8Y-1,1
:getKey:End:Ans→K
:X+(K=26 and X≠12)-(X and K=24→X
:Y+(K=34 and Y≠8)-(K=25 and Y→Y
:End
:If K=21:Then
:12(Y-1)+X-1→S
:End
:DelVar K
:Else
:If K=41:Then
:1→X:1→Y
:Repeat K=21 or K=15
:real(3,13,0,0
:Repeat Ans
:real(12,5,8X-8,8Y-8,8X-1,8Y-1,1
:real(12,5,8X-8,8Y-8,8X-1,8Y-1,1
:getKey:End:Ans→K
:X+(K=26 and X≠12)-(X and K=24→X
:Y+(K=34 and Y≠8)-(K=25 and Y→Y
:End
:If Y=8 and (X=12 or X=4
:Then
:Input "TEXT:",Str2
:If X=4:Str2→Str8
:If X=12:Str2→Str9
:End
:If K=21:Then
:X-1→L4(1+dim(L4
:Y-1→L4(1+dim(L4
:B+C→L4(1+dim(L4
:A+D→L4(1+dim(L4
:End
:DelVar K
:Else
:If K=44:Then
:0→dim(L4
:Else
:If K=51:Then
:{B+C,A+D→L2
:Input "DIRECTION: ",Z
:Input "HEALTH: ",R
:End:End:End:End:End:End:End
:J-(K=13 and J)+(K=13 and not(J→J
:M-(K=12 and M)+(K=12 and not(M→M
:G-(K=31 and G)+(K=31 and not(G→G
:L-(K=11 and L)+(K=11 and not(L→L
:A+(K=34 and A≠8)-(25=K and A≠1→A
:B+(B≠12 and K=26)-(K=24 and B≠1→B
:C+(K=84 and C<10)-(K=82 and C→C
:D+(K=93 and D<8)-(K=73 and D→D
:S+(K=95 and S≠100)-(K=85 and S→S
:S→[B](A+D,B+C
:End
:DelVar [B]
:Lbl 1
:ClrDraw
:"00000000000000000000000000000000000000000000→Str1
:Text(6,0,"TILES CONVERTED...
:getKey
:dim([A])→L3
:For(A,1,L3(1))
:For(B,1,L3(2))
:If getKey=15:Then
:16→A
:22→B
:End
:Text(0,0,L3(2)A+B,"/",L3(1)L3(2)+L3(2
:1+[A](A,B→S
:Str1+sub("000102030405060708090A0B0C0D0E0F101112131415161718191A1B1C1D1E1F20212223242526272829",2S-1,2→Str1
:End
:End
:Str1→Str2
:det(17,Str1→Str1
:real(0,1
:Str2
:DelVar Str2
:L2(1→X
:L2(2→Y
:ClrHome

4971
News / Re: #omnimaga relocates back to EfNet
« on: July 21, 2009, 02:36:48 pm »
Of course, #tcpa is also on EFNet: Unofficial IRC home of Detached Solutions and Ticalc!
too bad I'm banned for no real good reason

4972
TI Z80 / Re: Chip's Challenge- Asm (!)
« on: July 20, 2009, 09:43:20 pm »
maybe you guys could coordinate efforts?
looks good btw calc84maniac

4973
The Blue Platform / Re: updates
« on: July 20, 2009, 09:02:52 pm »
I have already started to work on the next level and I have finished the first map. I also made the mask for the boss, so now he works right on backgrounds.

4974
News / Re: #omnimaga relocates back to EfNet
« on: July 20, 2009, 06:48:24 pm »
ah, well I can't seem to find out why it keeps on assigning me a server....
I try different servers but I can't seem to get a message from any other then the one in Calgary...
hmm, maybe I should try the irc.prison.net...
oh yeah, for some reason Efnet.org doesn't redirect to Efnet.net on Firefox

4975
TI-BASIC / Re: Streaming Method (Celtic III)
« on: July 20, 2009, 06:38:45 pm »
kk, no problem
I've already got it mostly built because I will be using something almost the same for my game

4976
News / Re: #omnimaga relocates back to EfNet
« on: July 20, 2009, 06:37:59 pm »
well this kind of sucks, because I have problems with my efnet connection most of the time, and I kind of liked dragon-fire.
no matter, I understand the switch, and I guess I'll have to just try to find ways to keep my connection

4977
TI Z80 / Re: Chip's Challenge- Asm (!)
« on: July 20, 2009, 06:32:51 pm »
wow can't wait to see some more progress!
good job Simplethinker

4978
TI-BASIC / Re: Streaming Method (Celtic III)
« on: July 20, 2009, 06:23:34 pm »
lol, thanks. If you want I can make an engine for you to use, it will just take a little modification of what is above to make work. I'll make full documentation and everything

4979
The Blue Platform / Re: Screenshots
« on: July 19, 2009, 07:48:30 pm »
ok, here is my new tileset, I'm jut missing the mask for the boss, speaking of which, I should get to working on it

4980
The Blue Platform / Re: updates
« on: July 19, 2009, 06:02:09 pm »
I added some new tiles and one of them was solid, so I added the detection to the game, but atm it is untested.

Pages: 1 ... 330 331 [332] 333 334 ... 370