Posted by Lance 24.4.252.137 using Mozilla/4.5 [en]C-AtHome0405 (Win95; U) on March 17, 2000 at 17:58:19:
Just to get you drooling over Oasis, I took some screenshots. They are not as good as DandC, but good none the less.
Kyle Braxton exploring the cave that leads to the Garland Guard Tower...the target of the Drax army.
Kyle Braxton is a General in the Drax army.
Kyle Braxton standing outside of the Garland Guard Tower.
Kyle Braxton inside the Guard Tower.
That's all of the screenshots...but not the post.
I began to make myself a custom menu, but it was doomed to fail from the the start. It was keyboard based..ala FF.
I have deceided to release the source of my movement engine.
First I must explain what is done. The diffrent buttons (Items, Weapons,ect.) were jpegs converted into tiles. They were placed on a board with the backround image of the menu. Then an item shaped like the hand cursor is created and placed next to the top button.
The board is seen through #VeiwBrd ()
This is the engine that allows the hand item to move up and down the buttons and select which menu to choose.
#Include ("system.prg")
#CreateItem ("hand.itm", hand!)
#PutItem (hand!,16,2,1)
#button!==1
:UpWait
#ClearBuffer ()
#Wait (a$)
#If (a$==DOWN)
{
#Branch (:Position)
}
#If (a$==UP)
{
#Branch (:PushUp)
}
#If (a$==LEFT)
{
#Branch (:UpWait)
}
#If (a$==RIGHT)
{
#Branch (:UpWait)
}
#If (a$==ENTER)
{
#Branch (:Selector)
}
#Branch (:UpWait)
:Position
#If (button!==1)
{
#button!==2
#PushItem (hand!, "s")
#Wav ("sel.wav")
#Branch (:UpWait)
}
#If (button!==2)
#button!==3
#PushItem (hand!, "s")
#Wav ("sel.wav")
#Branch (:UpWait)
}
#If (button!==3)
{
#button!==4
#PushItem (hand!, "s")
#Wav ("sel.wav")
#Branch (:UpWait)
}
#If (button!==4)
{
#button!==5
#Wav ("sel.wav")
#PushItem (hand!, "s")
#Branch (:UpWait)
}
#If (button!==5)
{
#button!==6
#PushItem (hand!, "s")
#Branch (:UpWait)
}
#If (button!==6)
{
#button!==7
#PushItem (hand, "s")
#Wav ("sel.wav")
#Branch (:UpWait)
}
#If (button!==7)
{
#button!==8
#PushItem (hand, "s")
#Wav ("sel.wav")
#Branch (:UpWait)
}
#If (button!==8)
{
#button!==1
#EraseItem (hand!)
#PutItem (hand!,16,2,1)
#Wav ("sel.wav")
#Branch (:UpWait)
}
:Selector
#If (button!==1)
{
#Run ("menu_item.itm")
}
#If (button!==2)
{
#Run ("menu_equip.prg")
}
#If (button!==3)
{
#Run ("menu_spells.prg")
}
#If (button!==4)
{
#Run ("menu_status.prg")
}
#If (button!==5)
{
#Run ("menu_config.prg")
}
#If (button!==6)
{
#Run ("menu_save.prg")
}
#If (button!==7)
{
#Run ("menu_load.prg")
}
#If (button!==8)
{
#Run ("menu_quit.prg")
}
:PushUp
#If (button!==1)
{
#button!==8
#EraseItem (hand!)
#PutItem (hand!,16,10,1)
#Wav ("sel.wav")
#Branch (:UpWait)
}
#If (button!==2)
{
#button!==1
#PushItem (hand!, "n")
#Wav ("sel.wav")
#Branch (:UpWait)
}
#If (button!==3)
{
#button!==2
#PushItem (hand!, "n")
#Wav ("sel.wav")
#Branch (:UpWait)
}
#If (button!==4)
{
#button!==3
#PushItem (hand!, "n")
#Wav ("sel.wav")
#Branch (:UpWait)
}
#If (button!==5)
{
#button!==4
#PushItem (hand!, "n")
#Wav ("sel.wav")
#Branch (:UpWait)
}
#If (button!==6)
{
#button!==5
#PushItem (hand!, "n")
#Wav ("sel.wav")
#Branch (:UpWait)
}
#If (button!==7)
{
#button!==6
#PushItem (hand!, "n")
#Wav ("sel.wav")
#Branch (:UpWait)
}
#If (button!==8)
{
#button!==7
#PushItem (hand!, "n")
#Wav ("sel.wav")
#Branch (:UpWait)
}
Makes your head spin, no?
Probably tomorrow I will release my rain program.
And Martin, thanks for the reveiw of Imperial Nexus! I was too lazy back then to do my own graphics, but not anymore. Thanks man =)
....April 10th...
-Later o_0
-Lance