45 lines
1.0 KiB
OpenEdge ABL
45 lines
1.0 KiB
OpenEdge ABL
/********************************************************************************
|
|
-------------------------
|
|
Ultra 64 MARIO Brothers
|
|
-------------------------
|
|
|
|
File : pathkamakura.s
|
|
Description :
|
|
Date : 1995.
|
|
Author : H.yajima
|
|
|
|
********************************************************************************/
|
|
|
|
|
|
/*################*/
|
|
#ifdef ASSEMBLER
|
|
/*################*/
|
|
|
|
/********************************************************************************
|
|
kamakura program
|
|
********************************************************************************/
|
|
|
|
e_kamakura:
|
|
p_initialize(item)
|
|
p_setbit(flag,stf_moveON )
|
|
p_setobjname(KAMAKURA)
|
|
p_sethitbox(100,200)
|
|
p_hitON
|
|
p_save_nowpos
|
|
p_while
|
|
p_setd(mail,0)
|
|
p_loop
|
|
|
|
/*################*/
|
|
#else
|
|
/*################*/
|
|
/*################*/
|
|
#endif
|
|
/*################*/
|
|
/*===============================================================================
|
|
end end end end end end end end
|
|
===============================================================================*/
|
|
|
|
|
|
|