Character Select

-=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- (c) WidthPadding Industries 1987 0\|661\|0 -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=-
Socoder -> Blitz -> Character Select
Page : 1 Prev 2 3 Next
Tue, 25 May 2010, 14:39
ShadowIce	ok, i'll upload the models.
Tue, 25 May 2010, 15:11
ShadowIce	Dwarf1: https://www.mediafire.com/?ujjjim3ymoz SuperSonic: https://www.mediafire.com/download.php?3mymr5jnnae Ignore the wav files. u don't need them to be able to execute it
Wed, 26 May 2010, 08:14
ShadowIce	is that enough info?
Wed, 26 May 2010, 11:03
bram32	I think it is a bit difficult for people to download all media separately, via mediafire. You should make it as easy as possible for people to help you. A single download, with all source files and media would be best. Also, a clear description of your problem and a straightforward question work best: "i'm close, but still don't get it.." isn't really a good question. I have no idea what your problem is now, so how could I help? Mainly questions that are to the point, and a bit more generic, such as <<Q:how do I switch between models using Blitz3D? A:hide the first one, show the second one, using hideentity/showentity>>, are easy understandable for others. It may take a bit more preparation to make a posting, but it is surely worth the effords.
Wed, 26 May 2010, 11:06
ShadowIce	ok. i will upload the rar file.
Wed, 26 May 2010, 11:14
ShadowIce	https://www.mediafire.com/?mgynwwmidwo This has EVERYTHING.. Now. the problem is I can load both characters but I can't hide the previous 1 when switching to another sphere either on the left or on the right of selected sphere. also, i can't get it to load all characters on their own spheres at once like the 1st 15 secs of this video. https://www.youtube.com/watch?v=tY6KVgAE9BY
Wed, 26 May 2010, 12:09
bram32	I appreciate you taken the time to do that. That is why I've taken a look at it. At line 18, add the following: HideEntity mymodel(x) --v This will ensure that all models are hidden when the program starts. At line 97, add the following: If (SelectedArray = 0) Or (SelectedArray = 1) HideEntity mymodel(SelectedArray) --v This will ensure that the previous model you selected is hidden. Then, at line 109 (or 110 if you've added a return/enter), add: If (SelectedArray = 0) Or (SelectedArray = 1) ShowEntity mymodel(SelectedArray) --v This will ensure that the 'new' model you selected is shown. Obviously, it will only work with model 0 and model 1, so you have to skip a bit around before the model appears. I noticed a few other issues: you are using Include "start.bb" --v which is followed by Graphics3D 640,480,0,2 --v So graphics mode is set twice. You might better remove one of them. Also, around line 135 and around line 145, there is a RenderWorld command. So the world is rendered twice. You should remove the second one -> the one before 'Flip'. It should also ensure you can see the text you are writing onto the screen. It is issues like these that make me think that it is a good idea to clean up the code. It now comes across as a patchwork. Indenting and revising redundant parts will maintain readability. Readability is of key importance when trying to solve issues, when expanding your code and when asking for help.
Wed, 26 May 2010, 12:25
Erebel55	ShadowIce, make sure you take the time to read the full content of bram32's post..some very useful information in there, and remember that he went out of his way to give you that. Good luck -=-=- Lava Monkey https://play.google.com/store/apps/details?id=com.lvm.lavamonkey
Wed, 26 May 2010, 13:52
ShadowIce	it's still not working. it temporarily showing the model. then hiding it again. ; congratulations i corrected it for you:ps: copy and past model and position code for your other charectors the one's with the notes sign:!!!!! Include "start.bb" ; Sets 3D graphics mode boring! SetBuffer BackBuffer() ;camera and light boring! camera=CreateCamera() light=CreateLight() ;add model now where talking :P ps: reapet this code for other models then position them in next code part!!!! Dim mymodel(2) mymodel(0)=LoadAnimMesh("super sonic.x") mymodel(1)=LoadAnimMesh("dwarf1.b3d") mymodel(2)=CreateCube() ;position scale and rotate it boring! ps: reapet this code for positioning the models in list circle this is the next code part!!!!! For x=0 To 1 If x=0 Or x=1 RotateEntity mymodel(x),0,-180,0 ScaleEntity mymodel(x),.04,.04,.04 PositionEntity mymodel(x),0,0,5 HideEntity mymodel(x) EndIf Next ;music its ok :P Global charmusic charmusic=LoadSound("Sonic Adventure Music - Choose Your Buddy! -Slap Bass ver.-.mp3") ;LoopSound charmusic ;PlaySound charmusic ;6 slots! Global SelectedArray = 6 ;pivs! Global pivs ;balls! Global Balls = 10 Dim myspheres(Balls) For x=0 To Balls-1 myspheres(x) = CreateSphere(25) EntityShininess myspheres(x),1 Next ;select sounds! Global charselect = LoadSound("sa_002.WAV") Global oksound = LoadSound("sa_003.WAV") ;angles Global CurrentAngle# ;player! Global player=CreateCube() ScaleEntity player,.04,.04,.04 HideEntity player RotateEntity player,0,-180,0 PositionEntity player,0,0,5 Global pivid ;cam and object! Global type_cam = 1 Global type_obj = 2 ;pivot stuff!:P Global mainpiv = CreatePivot() PositionEntity mainpiv,0,4,10 EntityType mainpiv,type_obj EntityRadius mainpiv,1 ;entity program of player sphere obj! For x = 0 To Balls-1 players = CopyEntity(player) ScaleEntity players,.2,.2,.2 EntityParent myspheres(x),mainpiv EntityParent players,myspheres(x) PositionEntity myspheres(x),Sin((360/Balls)x)4,Cos((360/Balls)x)4,0 EntityType myspheres(x),type_obj EntityRadius myspheres(x),0.25 ScaleEntity myspheres(x),0.25,0.25,0.25 Next EntityParent player,pivs Z1#=Balls AngleChange#=360.0/Z1 angle# = 0 ;end of the file congratulation!!!! While Not KeyDown( 1 ) ;If selected var! If SelectedArray < 0 Then SelectedArray = balls-1 If SelectedArray > balls-1 Then SelectedArray = 0 For x=0 To Balls-1 ;Animate players,1,1,1 Next If KeyHit(28) PlaySound oksound EndIf If (SelectedArray = 0) Or (SelectedArray = 1) Or (SelectedArray = 2) HideEntity mymodel(SelectedArray) If KeyHit(44) SelectedArray = SelectedArray - 1 angle#=angle#-AngleChange# PlaySound charselect EndIf If KeyHit(45) SelectedArray = SelectedArray + 1 angle#=angle#+AngleChange# If (SelectedArray = 0) Or (SelectedArray = 1) Or (SelectedArray = 2) ShowEntity mymodel(SelectedArray) PlaySound charselect EndIf For i=0 To balls-1 EntityColor myspheres(i),0,0,255 If i=SelectedArray EntityColor myspheres(i),255,0,0 For x=0 To 1 If x=0 Or x=1 EntityParent mymodel(x),myspheres(i) PositionEntity mymodel(x),0,0,0 RotateEntity mymodel(x),0,-180,0,True EndIf Next EndIf Next CurrentAngle#=CurrentAngle#+(Angle#-CurrentAngle#).1 ;<<This will move CurrentAngle towards Angle at 10% of the difference each frame. RotateEntity mainpiv,0,0,(CurrentAngle#+36) MoveEntity camera,(KeyDown(32)-KeyDown(30) Or KeyDown(203)-KeyDown(205))1,0,(KeyDown(17)-KeyDown(31) Or KeyDown(200)-KeyDown(208))*1 UpdateWorld() Text 10,10,"CurrentAngle#:"+CurrentAngle# Text 10,30,"angle#:"+angle# Text 10,50,"press z or x to select character" Text 10,70,"press enter to select character" Text 10,90,"SelectedArray:"+SelectedArray Text 10,110,"Z:"+EntityZ(camera) RenderWorld Flip Wend End --v
Wed, 26 May 2010, 14:08
bram32	That last line should be placed two lines lower, after 'endif'.
Wed, 26 May 2010, 14:15
ShadowIce	what line?
Wed, 26 May 2010, 14:18
ShadowIce	o ok. i think i got it. is this it? ; congratulations i corrected it for you:ps: copy and past model and position code for your other charectors the one's with the notes sign:!!!!! Include "start.bb" ; Sets 3D graphics mode boring! SetBuffer BackBuffer() ;camera and light boring! camera=CreateCamera() light=CreateLight() ;add model now where talking :P ps: reapet this code for other models then position them in next code part!!!! Dim mymodel(2) mymodel(0)=LoadAnimMesh("super sonic.x") mymodel(1)=LoadAnimMesh("dwarf1.b3d") mymodel(2)=CreateCube() ;position scale and rotate it boring! ps: reapet this code for positioning the models in list circle this is the next code part!!!!! For x=0 To 1 If x=0 Or x=1 RotateEntity mymodel(x),0,-180,0 ScaleEntity mymodel(x),.04,.04,.04 PositionEntity mymodel(x),0,0,5 HideEntity mymodel(x) EndIf Next ;music its ok :P Global charmusic charmusic=LoadSound("Sonic Adventure Music - Choose Your Buddy! -Slap Bass ver.-.mp3") ;LoopSound charmusic ;PlaySound charmusic ;6 slots! Global SelectedArray = 6 ;pivs! Global pivs ;balls! Global Balls = 10 Dim myspheres(Balls) For x=0 To Balls-1 myspheres(x) = CreateSphere(25) EntityShininess myspheres(x),1 Next ;select sounds! Global charselect = LoadSound("sa_002.WAV") Global oksound = LoadSound("sa_003.WAV") ;angles Global CurrentAngle# ;player! Global player=CreateCube() ScaleEntity player,.04,.04,.04 HideEntity player RotateEntity player,0,-180,0 PositionEntity player,0,0,5 Global pivid ;cam and object! Global type_cam = 1 Global type_obj = 2 ;pivot stuff!:P Global mainpiv = CreatePivot() PositionEntity mainpiv,0,4,10 EntityType mainpiv,type_obj EntityRadius mainpiv,1 ;entity program of player sphere obj! For x = 0 To Balls-1 players = CopyEntity(player) ScaleEntity players,.2,.2,.2 EntityParent myspheres(x),mainpiv EntityParent players,myspheres(x) PositionEntity myspheres(x),Sin((360/Balls)x)4,Cos((360/Balls)x)4,0 EntityType myspheres(x),type_obj EntityRadius myspheres(x),0.25 ScaleEntity myspheres(x),0.25,0.25,0.25 Next EntityParent player,pivs Z1#=Balls AngleChange#=360.0/Z1 angle# = 0 ;end of the file congratulation!!!! While Not KeyDown( 1 ) ;If selected var! If SelectedArray < 0 Then SelectedArray = balls-1 If SelectedArray > balls-1 Then SelectedArray = 0 For x=0 To Balls-1 ;Animate players,1,1,1 Next If KeyHit(28) PlaySound oksound EndIf If (SelectedArray = 0) Or (SelectedArray = 1) Or (SelectedArray = 2) HideEntity mymodel(SelectedArray) If KeyHit(44) SelectedArray = SelectedArray - 1 angle#=angle#-AngleChange# PlaySound charselect EndIf If KeyHit(45) SelectedArray = SelectedArray + 1 angle#=angle#+AngleChange# PlaySound charselect EndIf If (SelectedArray = 0) Or (SelectedArray = 1) Or (SelectedArray = 2) ShowEntity mymodel(SelectedArray) For i=0 To balls-1 EntityColor myspheres(i),0,0,255 If i=SelectedArray EntityColor myspheres(i),255,0,0 For x=0 To 1 If x=0 Or x=1 EntityParent mymodel(x),myspheres(i) PositionEntity mymodel(x),0,0,0 RotateEntity mymodel(x),0,-180,0,True EndIf Next EndIf Next CurrentAngle#=CurrentAngle#+(Angle#-CurrentAngle#).1 ;<<This will move CurrentAngle towards Angle at 10% of the difference each frame. RotateEntity mainpiv,0,0,(CurrentAngle#+36) MoveEntity camera,(KeyDown(32)-KeyDown(30) Or KeyDown(203)-KeyDown(205))1,0,(KeyDown(17)-KeyDown(31) Or KeyDown(200)-KeyDown(208))*1 UpdateWorld() Text 10,10,"CurrentAngle#:"+CurrentAngle# Text 10,30,"angle#:"+angle# Text 10,50,"press z or x to select character" Text 10,70,"press enter to select character" Text 10,90,"SelectedArray:"+SelectedArray Text 10,110,"Z:"+EntityZ(camera) RenderWorld Flip Wend End --v
Wed, 26 May 2010, 14:19
bram32	Don't know, does it work?
Wed, 26 May 2010, 14:28
ShadowIce	sorta. now the problem is getting the showed model to display at the red ball ONLY and show all other spheres w/ characters above them. it shows if u switch between spheres, but not if u want to position the loaded model at the selected sphere
Wed, 26 May 2010, 14:54
bram32	Okay, do you have any ideas how to approach this?
Wed, 26 May 2010, 14:56
ShadowIce	nope. no idea.. i tried If SelectedArray=5 but that only made it worse
Wed, 26 May 2010, 15:07
bram32	What good could that line do? It checks if selectedarray is 5, but there is no 'then' part? First structurize your code. If you add things, but you have no clear idea what it does, how can you add anything? Then, you should set out your goal, which is this: <<getting the showed model to display at the red ball ONLY and show all other spheres w/ characters above them>> That is actually 2 things: 1. getting the showed model to display at the red ball ONLY 2. show all other spheres w/ characters above them This first point is actually two things as well: 1. getting the showed model to display at <anywhere> 2. getting the showed model to display at the red ball ONLY A step-by-step approach is the best way to solve this. But you can't skip steps because you don't like them. Thus, this could be your to-do list: 1. structurize your code, clean up & remove redundant code 2. getting the showed model to display at <some place> 3. getting the showed model to display at the red ball ONLY 4. show all other spheres w/ characters above them
Wed, 26 May 2010, 15:25
ShadowIce	i added the then. now can someone please help me who WON'T play mind games?
Wed, 26 May 2010, 16:48
bram32	I'm sorry, do you mean me? If the above doesn't help you, then what do you need?
Wed, 26 May 2010, 17:56
ShadowIce	what i need is to be able to position the VISIBLE object at sphere 5 or SelectedArray=5 if u will, yet still show all the OTHER objects on other spheres. NOW. when the user hits the key, it "SWITCHES" that model to sphere 5 thus hiding the old model, and showing the new..
Wed, 26 May 2010, 18:22
bram32	Sure, I understand that. But it can't be done in one step. There is not a single command for it, such as SwitchEntity o.s. So instead, you might wanna break your goal up into smaller parts, and then achieve these subgoals one by one. Looking at the code you wrote allready, you should be able to pull this one off. It is just a matter of finding the right combination of things. Breaking it down into smaller parts should help you doing so.
Wed, 26 May 2010, 18:31
ShadowIce	ugh. again w/ the mind games. in order to learn, u have to teach me like u were earlier w/ the hideentity and showentity thing u showed me.
Wed, 26 May 2010, 20:30
Mog	ShadowIce, these aren't mind games- it's very valid advice. I don't want to come across as a dick or anything, but we're not going to hold your hand through all of this. As bram pointed out, there are a lot of inherant problems with your code that makes it hard to debug and work with. I know you're just learning but I, myself, feel put off by the language you're using. We're here to help and are trying, but for god's sake man, approach the advice logically and it will all make sense. PS: Please please PLEAAAASE use the edit button, double and even triple posting is annoying and bloated. -=-=- I am Busy Mongoose - My Website Dev PC: AMD 8150-FX, 16gb Ram, GeForce GTX 680 2gb Current Project: Pyroxene
Wed, 26 May 2010, 23:09
Cower	ShadowIce: You wouldn't happen to be that Rez guy from blitzbasic.com, would you? 'Cause that guy's a douche. \|edit\| Also, everyone should probably stop helping this guy, since you're just writing his code for him, considering he's doing nothing himself. \|edit\|
Thu, 27 May 2010, 06:24
ShadowIce	um, who is rez? i can't believe you would come on and mess with innocent people..
Page : 1 Prev 2 3 Next