Karoshi MSX Community
22 de Septiembre de 2017, 06:49:59 am *
Bienvenido(a), Visitante. Por favor, ingresa o regístrate.

Ingresar con nombre de usuario, contraseña y duración de la sesión
Noticias:
 
   Inicio   Ayuda Buscar Calendario Ingresar Registrarse  
Páginas: [1] 2
  Imprimir  
Autor Tema: Linear trajectory  (Leído 8518 veces)
0 Usuarios y 1 Visitante están viendo este tema.
jltursan
Karoshi Forum's Guru
*******
Mensajes: 1516


¿Que es lo que has aprendido hoy?


Ver Perfil WWW Email
« : 12 de Marzo de 2006, 09:09:55 pm »

[Original snippet by Wyz]

It can be very usefull to shoot'em up programers. This is my proposal:

Considering only starting and final points (shooter and objetive)

Código:
; DIRECTION OF A LINEAR TRAJECTORY
; MODULE APROX. TO 1

; POSICION INICIAL: XI,YI
; POSICION FINAL: XF,YF
; INCREMENTOS; INCX,INCY

LD HL,[XI]
EX DE,HL
LD HL,[XF] ;D=YI,E=XI,H=YF,L=XF

LD A,H ;SIGNO Y
SBC D
LD A,0
RLA
LD [SIGN_INCY],A

LD A,L ;SIGNO X
SBC E
LD A,0
RLA
LD [SIGN_INCX],A

SBC HL,DE ;MODULE~1
MODBC0: BIT 7,H ;IF START=FINAL => HANGS
JR NZ,FIN
BIT 7,L
JR NZ,FIN
RLC H
RLC L
JR MODBC0

FIN: LD [INCX],HL
RET

XI: DB 10 ;START POSITION (EXAMPLE)
YI: DB 10
XF: DB 80 ;FINAL POSITION
YF: DB 80

INCX: DB 0 ;INC COORD X
INCY: DB 0 ;INC COORD Y
SIGN_INCX: DB 0 ;SIGNO INCX
SIGN_INCY: DB 0 ;SIGNO INCY

;___________________________________________________

;THEN TO MOVE A BULLET(X,Y) DEFINE

;X AS WORD - HIGH BYTE TO SPRITE COORD X,Y
;Y AS WORD -

;INCX AS BYTE
;INCY AS BYTE

;AND CONSIDER THE SIGN


LD HL,[X]
LD A,[INCX]
LD D,0
LD E,A
LD A,[SIGN_INCX]
AND A
JR NZ,THEN_SUBSTRACT
ADD HL,DE
JR NEXT
THEN_SUBSTRACT: SBC HL,DE
NEXT: LD [X],HL
....
En línea

Doom dee doom dee doom
WYZ
Visitante
« Respuesta #1 : 16 de Marzo de 2006, 12:44:33 am »

As soon as possible I will try to use this snippet. '06 is comming fast! I guess dev'06 will recive more than 50 roms.
En línea
KNM
Karoshi Hero
*****
Mensajes: 755

Fearless

jbosca@hotmail.com
Ver Perfil Email
« Respuesta #2 : 17 de Marzo de 2006, 11:05:19 am »

That´s the spirit,WYZ.It´s a pleasure see you with energy for making new things Cheesy.Don´t give up!!!

KNM
Dev´06 NOW!
En línea

<Bacterion> : ¿ Por qué la gente se empeña en pulsar F5 ?
Dioniso
Visitante
« Respuesta #3 : 17 de Marzo de 2006, 02:40:33 pm »

That´s the spirit,WYZ.It´s a pleasure see you with energy for making new things Cheesy.Don´t give up!!!

Don't give up, for the glory of Perry Mason!!!
En línea
KNM
Karoshi Hero
*****
Mensajes: 755

Fearless

jbosca@hotmail.com
Ver Perfil Email
« Respuesta #4 : 17 de Marzo de 2006, 07:04:25 pm »

Do you realize?Sinner of the meadowls!Coward! Grin Grin Grin Grin Grin Grin Grin Grin

KNM
English Chiquiteitor! :voguel: :voguel:
En línea

<Bacterion> : ¿ Por qué la gente se empeña en pulsar F5 ?
SapphiRe
Visitante
« Respuesta #5 : 17 de Marzo de 2006, 07:30:48 pm »

I can't, I can't! I didn't say you wheat to not call you Rodrigo!

Chiquititaaaun, taaun taaaaun...
En línea
KNM
Karoshi Hero
*****
Mensajes: 755

Fearless

jbosca@hotmail.com
Ver Perfil Email
« Respuesta #6 : 17 de Marzo de 2006, 07:32:24 pm »

¡Me rindo!¡Esa me ha dado en todo el hígado! JUAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAR  Cheesy Cheesy Cheesy Cheesy Cheesy Cheesy

KNM
Chiquito Forever
En línea

<Bacterion> : ¿ Por qué la gente se empeña en pulsar F5 ?
SapphiRe
Visitante
« Respuesta #7 : 17 de Marzo de 2006, 07:37:13 pm »

I´m going to make you the little fall of Rome!!!
En línea
KNM
Karoshi Hero
*****
Mensajes: 755

Fearless

jbosca@hotmail.com
Ver Perfil Email
« Respuesta #8 : 17 de Marzo de 2006, 07:41:37 pm »

WhatR?I´m going to erase your sexual zero,you sinner fistro!

KNM
Straigth Man...No confuse!
En línea

<Bacterion> : ¿ Por qué la gente se empeña en pulsar F5 ?
SapphiRe
Visitante
« Respuesta #9 : 17 de Marzo de 2006, 07:42:45 pm »

It's one go and say: "mom'r mom'r (pant-pant) I'm very hairy... hiiiiii!!!!!"
And the mom says: "hiiiiii!!!! the dog's speaking!"
En línea
jltursan
Karoshi Forum's Guru
*******
Mensajes: 1516


¿Que es lo que has aprendido hoy?


Ver Perfil WWW Email
« Respuesta #10 : 17 de Marzo de 2006, 08:46:49 pm »

Pues ya que estamos, aquí teneis una beta de mi generador automático de chiquitistaní limitado :

Para peaso fistro, pinchar aqui
En línea

Doom dee doom dee doom
KNM
Karoshi Hero
*****
Mensajes: 755

Fearless

jbosca@hotmail.com
Ver Perfil Email
« Respuesta #11 : 18 de Marzo de 2006, 11:06:57 am »

¡ESTO ES LA HOSTIA!Chiquiteitor surrealista al 200%..."Tienes mas peligror que Carmen Sevilla desenroscando bombillas"  Grin Grin Grin Grin Grin Grin Grin Grin.Jose Luis,MAGISTRAL,como siempre  Wink

KNM
Descojonandose... Cheesy Cheesy Cheesy Cheesy
En línea

<Bacterion> : ¿ Por qué la gente se empeña en pulsar F5 ?
WYZ
Visitante
« Respuesta #12 : 18 de Marzo de 2006, 12:46:41 pm »

 Shocked

You are more dangerous than Geppetto's Black&decker.
En línea
Darth_Fistro
Karoshi Hero
*****
Mensajes: 507


Ver Perfil Email
« Respuesta #13 : 18 de Marzo de 2006, 05:27:19 pm »

This is a piece of a program, for the glory of my mother!  Cheesy
En línea

MSX FOREVER (hasta que saquen un ZX81 con TMS, PSG y 64K de RAM)
SapphiRe
Visitante
« Respuesta #14 : 18 de Marzo de 2006, 06:14:57 pm »

¡Tienes más peligro que Raphael resolviendo una integral!

QUEEE MEEEEEE MEEEEEOOOOOOOOOOO!!!!!!!!!!!!

JUUUUUUUUUUUUUUAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAASSSSSSSSSSSSSSSSS!!!!
 Grin Grin Grin Grin Grin Grin Grin Grin Grin Grin Grin Grin Grin Grin Grin Grin Grin Grin Grin Grin Grin Grin Grin Grin Grin Grin Grin Grin Grin Grin Grin Grin Grin Grin Grin
En línea
Páginas: [1] 2
  Imprimir  
 
Ir a:  

Impulsado por MySQL Impulsado por PHP Powered by SMF 1.1.21 | SMF © 2013, Simple Machines XHTML 1.0 válido! CSS válido!