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 - Aichi
Pages: 1 ... 14 15 [16] 17 18 ... 20
226
« on: November 02, 2010, 10:48:05 am »
6) I have some trouble with the Tasm Compiler (from the 28 days tutorial). I want to store the program data byte (CursY) into the L register, but Tasm outputs a strange issue on this line, which I cant explain me. Source and Screenshot attached.
227
« on: November 01, 2010, 03:18:03 pm »
I dont like option 1.  As you said, it isnt a good idea to make the loss dependent of the moment where you saved last time. Option 2 sounds better, but what about resetting the experience value (if your game supports a level up system) instead of losing money? I would hate it to lose money. 
228
« on: November 01, 2010, 12:25:44 pm »
Yeah, that's a known issue with Mimas. You have to write "LD D, (IX+0)" instead.
Ah, thanks. I should develope on PC while Mimas' early Alpha phase. 5) How compare I the HL register by using something like CP?
229
« on: October 31, 2010, 12:43:42 pm »
1) Thank you!  2) Ok, I found a nice routine by Joe Wingbermuehle. 3) Perhaps gbuf is the same as the system pointer 'plotsscreen'. 4) http://wikiti.brandonw.net/index.php?title=Z80_Routines:Graphic:put8x8sprite I tried to copy the first routine into Mimas, but it seems like Mimas cannot handle the line LD D, (IX) ôo. Does anyone know what the problem is?
230
« on: October 31, 2010, 06:32:48 am »
I thought I could learn Asm by disassembling single Axe Parser compiled commands, but this idea was fail.  I read some tutorials and source codes, but there are still some issues: 1) How let I run my prog under 15Mhz processor speed? 2) How to randomize a word, like Axe Parser's rand^x? 3) I want to include Joe Wingbermuehles's fastcopy routine into my code, but I'm not sure what 'gbuf' has to be. I think it must be a constant pointed to the start of the Buffer, if yes, which adress is it on a TI84+? I dont use ion.inc, since this means to be unable to use ti83plus.inc at the same time. Thats all for now. Thanks in advance! Regards, Aichi
231
« on: October 27, 2010, 09:16:05 am »
It is looking great so far! Now I look forward to new progress. Keep up this super work.
232
« on: October 26, 2010, 09:52:07 pm »
Do I need the parentheses in getkey? I tried it without the . 45 and it did the same thing.
Yes, you need to type the keycode in parantheses. All written after a dot is commenting text that will be ignored by Axe. You just have to write .KEYPRESS
Repeat Getkey(15)
End
233
« on: October 26, 2010, 09:31:44 pm »
but now the program won't close, even with Clear pressed. What now?
Sorry, thats my fault. 45 is the basic keycode for CLEAR. What you have to use is 15. Edit: Here are all keycodes.
234
« on: October 26, 2010, 09:13:29 pm »
Welcome here!
You can get Pics, Strings etc by pressing VARS. You have to use these tokens to call the OS Vars.
You can activate lowercase by change the option 'Alpha' in the Axe Parser Options menu. You can write text in lowercase by pressing ALPHA a second time.
Use 'Pause' + a value to freeze the program a particular time. Pause 1900 is a second on 6Mhz.
If you want to wait until a key is pressed, you should use
.KEYPRESS
Repeat Getkey(15) . 15 = Keycode for CLEAR, take a look at the keycode picture in the Axe Parser folder
End
Edit: Changed 45 to 15.
235
« on: October 26, 2010, 07:54:44 am »
I noticed there are guys walking across the interface in the attached screenies of reply 148. Seems to be a bug. I does take over 5000 bytes.
While your program wont be larger than 20KB you dont need to be worry about the memory size. And thanks for the linking on ticalc.
236
« on: October 23, 2010, 02:35:17 pm »
I made improvements in your code and found mistakes you made. It could be the solution.  :If G+8=P or (G+16=P or (G-8=P or (G-16=P
:If D=Q
:sub(L19
:End
:End
:
:If D+8=Q or (D+16=Q or (D-8=Q or (D-16=Q
:If G=P
:sub(L19
:End
:End
:
:If {{L1}+1}=(P+8) or ({{L1}+1}=(P+16) or ({{L1}+1}=(P-8) or ({{L1}+1}=(P-16
:If ({{L1}+2}=Q
:sub(L22
:End
:End
:
:If ({{L1}+2}=(Q+8) or ({{L1}+2}=(Q+16) or (({{L1}+2}=(Q-8) or (({L1}+2}=(Q-16
:If {{L1}+1}=P
:sub(L22
:End
:End
:
:Lbl L19
:L+19->L
:Return
:
:Lbl L22
:L+22->L
:Return
Instead of: :.SCROLL DOWN TO SEE WHERE I MARK THE MISTAKES :P
:If G+8=P and (D=Q
:L+19→L
:End
:If G+16=P and (D=Q
:L+19→L
:End
:If G-8=P and (D=Q
:L+19→L
:End
:If G-16=P and (D=Q
:L+19→L
:End
:If G=P and (D+8=Q
:L+19→L
:End
:If G=P and (D+16=Q
:L+19→L
:End
:If G=P and (D-8=Q
:L+19→L
:End
:If G=P and (D-8=Q . HERE, YOURE USING THIS BOOLEAN A SECOND TIME =D
:L+19→L
:End
:If {{L1}+1}=P+8 and ({{L1}+2}=Q
:L+22→L
:End
:If {{L1}+1}=P+16 and ({{L1}+2}=Q
:L+22→L
:End
:If {{L1}+1}=P-8 and ({{L1}+2}=Q
:L+22→L
:End
:If {{L1}+1}=P-16 and ({{L1}+2}=Q
:L+22→L
:End
:If {{L1}+1}=P and ({{L1}+2}=Q+8 . (Q+8) ! OTHERWISE THE BOOLEAN WOULD BE {{L1}+2}=Q, AND 8 WILL BE ADDED TO THE RETURNED 1 OR 0, WHAT LET THE BOOLEAN BE ALWAYS TRUE D:
:L+22→L
:End
:If {{L1}+1}=P and ({{L1}+2}=Q+16 . (Q+16)
:L+22→L
:End
:If {{L1}+1}=P and ({{L1}+2}=Q-8 . (Q-8)
:L+22→L
:End
:If {{L1}+1}=P and ({L1}+2}=Q-16 . (Q-16)
:L+22→L
:End
237
« on: October 23, 2010, 03:35:09 am »
Um. I lost the complete source by an oncalc mem clear. I stop working on this project for awhile and I will probably disassemble the v0.4b app to continue the project via pure assembly. Sorry for that.
238
« on: October 22, 2010, 07:09:05 pm »
Ah, sorry. It was my fault. The new version didnt overwrite the old, when I had downloaded it.
240
« on: October 22, 2010, 05:48:03 pm »
could you post source?
Wait a second. Edit: Added attachments.
Pages: 1 ... 14 15 [16] 17 18 ... 20
|
Show Posts