Players Swapping? - BlitzCoder.net

-=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- (c) WidthPadding Industries 1987 0\|724\|0 -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=- -=+=-
Socoder -> Blitz -> Players Swapping?
Wed, 12 Mar 2014, 09:48
Hotshot	For example, you have 25 players, 11 first team players, 7 Backup players, 7 Youth young players Of course I will be using players skill for each positions(goalkeeper,defence,midfield,attack) When come Team selections, for example, if I have better goalkeeper in backup Team then I want to swap my backup goalkeeper for first team goalkeeper but how would I do in code? Is to do with Arrays that I can swap over? for example if I am doing text base with players name of using arrays to swap over and questions I would like ask is how?
Wed, 12 Mar 2014, 10:13
Jayenkai	To "swap" two things, you actually need three. You can imagine this as being two items in your hands, and needing a nearby desk to place one onto, in order to swap the items in your hands. 1. Create (or find) a "Temporary" item. (Imagine this is your "desk") if you're using a Type, make a new type. If an array, find an empty slot. 2. Copy everything from Object 1 into the Temporary object. (You're placing the object from your left hand onto the desk) Make sure you include all the elements, or sub-array parts. 3. Copy everything from Object 2 over to Object 1. (You're moving the object from your right hand into your left hand.) Make sure you copy across all the bits and pieces. 4. Copy everything from the Temporary object over to Object 2. (You're picking up the item from the desk, with your right hand) Again, ensure you get all the pieces of information. 5. Empty the Temporary object, delete if necessary. -=-=- ''Load, Next List!''
Wed, 12 Mar 2014, 13:06
Hotshot	I am not good on type but it seem like sort of bubble sort array where if person want swap somethings like player_Name(i)=temp(i) temp(i)=Player_Name(i) swap=true could you make basic text 3 player name of swapping player as I would be able to learn from it because I have never done it before
Wed, 12 Mar 2014, 13:29
Jayenkai	More like, if you want to swap Player(i) and Player(j) Temp=player(i) Player(i)=Player(j) Player(j)=temp -=-=- ''Load, Next List!''
Wed, 12 Mar 2014, 14:19
spinal	Player(i) = Player(i) + Player(j) Player(j) = Player(i) - Player(j) Player(i) = Player(i) - Player(j) or Player(i) = Player(i) ^ Player(j) Player(j) = Player(i) ^ Player(j) Player(i) = Player(i) ^ Player(j) --v https://chris-taylor.github.io/blog/2013/02/25/xor-trick/ -=-=- Check out my excellent homepage!
Wed, 12 Mar 2014, 15:25
rockford	That's different Spinal. Not seen that one before I used to do what Jay does - three different variables a,b,c. GLBasic now has a command that speeds this up a little so I now just use "SWAP a,b", but it's essentially the same. Hotshot: If you had the values within a range (eg a high score) then you'd use bubblesorting with the swap method to move scores up the list depending on their value.
Wed, 12 Mar 2014, 15:25
Hotshot	I got a problem....how do I select on player then click on swap boxed to swap who I want. It is same game that I used play on Amiga called Ultimate Soccer Manager I am trying to create somethings like this Hence why I thought simple button is good idea but dont have clue on how to select the players thought ; Credits for Pongo for Simple button code which what I need ; Problem need to select on the player then click on swap button on who I want to swap positions! Graphics 640,480,16,2 SetBuffer BackBuffer() Global mx,my,info$ Global buttonheld,ID_clicked Type button Field image$ ;image containing button graphics Field x ;x position of button Field y ;y pos of button Field width ;width of button Field height ;height of button Field id ;so we know which button has been pressed Field state ;mouse over/up/down End Type ; create text button examples ;Create a button like this: CreateTextButton.button (Label$, x,y, width,height, id, centered = False) b1.button = CreateTextButton ("Swap",350,50, 100,20, 1, 0) ; Basic Players Attributes Type Players Field Name[25] Field Age[25] Field Position[25] Field Skill[25] End Type ;b.button = CreateImageButton (LoadAnimImage ("buttontest1.png",128,32,0,3), 50,250, 5) While Not KeyHit(1) mx = MouseX () : my = MouseY() ; grab the mouse position at the top of the loop For i=1 To 25 ftplayer.players = New players Read firstname$ Read age Read Position Read Skill Text 0,0+i12,ftplayer\Name[i]+" "+ftplayer\Age[i]+" "+ftplayer\Position[i]+" "+ftplayer\Skill[i] Next updatebuttons() ; check rollover state and draw buttons to screen. Call this every loop. buttonaction() ;this will execute the results of any button presses. Text 50,420,Info$ If KeyDown(57) ;draw a cursor crosshair on the screen with the mouse coords Line mx,0,mx,GraphicsHeight() : Line 0,my,GraphicsWidth(),my ; draw crosshair on screen Text 0,0,mx + "," + my EndIf Flip Cls Wend End Function CreateTextButton.button (Label$,x,y,width,height,id,centered = False) b.button = New button b\image = CreateImage(width,height,3) ;normal state of button SetBuffer ImageBuffer(b\image,0) Color 140,140,140 Rect 0,0,width,height,1 ;fill Color 0,255,0 Rect 0,0,width,height,0 ;outline Color 255,255,255 Text width.5,height.5,label$,1,1 ;hit state of button SetBuffer ImageBuffer(b\image,1) Color 220,220,220 Rect 0,0,width,height,1 ;fill Color 255,0,0 Rect 0,0,width,height,0 ;outline Color 0,0,0 Text width.5,height.5,label$,1,1 ;Rollover state of button SetBuffer ImageBuffer(b\image,2) Color 180,180,180 Rect 0,0,width,height,1 ;fill Color 0,255,0 Rect 0,0,width,height,0 ;outline Color 255,255,255 Text width.5,height.5,label$,1,1 SetBuffer BackBuffer() b\x = x b\y = y b\width = ImageWidth(b\image) b\height = ImageHeight(b\image) b\id = id b\state = 0 If centered Then b\x = (GraphicsWidth().5) - (b\width.5) ;center on screen vertically Return b End Function Function CreateImageButton.button (image,x,y,id,centered = False) b.button = New button b\image = image MaskImage b\image,255,0,255 ; mask out pink color b\x = x b\y = y b\width = ImageWidth(image) b\height = ImageHeight(image) b\id = id b\state = 0 If centered Then b\x = (GraphicsWidth().5) - (b\width*.5) ;center on screen vertically Return b End Function Function updatebuttons() For b.button = Each button If RectsOverlap(mx,my,1,1, b\x, b\y, b\width, b\height) If MouseDown(1) Then b\state = 1 ; button is being held down over button buttonheld = 1 Else b\state = 2 ; mouse is hovering over button with no button down If buttonheld = 1 ; was the button down last time? If so, mouse has just clicked up. ID_clicked = b\id ;this button has been clicked. set to ID of clicked button buttonheld = 0 ;reset the button down value EndIf EndIf Else ; mouse is not over button b\state = 0 ;normal state of button EndIf DrawImage b\image,b\x,b\y,b\state ; draw the button to screen Next End Function Function ButtonAction() ;Use this function to take action based on which button has been pressed. Each time you make a button, give it a unique ID. ;Then add a new case for that ID here. Select ID_clicked Case 1 ;this button ID has been clicked. Do stuff here ;info$ = "Button A has been clicked" Temp=ftplayer\Name(i) ftplayer\Name(i)=ftplayer\Name(j) ftplayer\Name(j)=temp End Select ID_clicked = -1 End Function Data "D Seasea",25,GK,90 ;<< First Team Data "P Solo ",20,DL,70 Data "D Higgin",30,DC,85 Data "S ancell",34,DC,95 Data "O Lee ",30,DR,90 Data "Z polo " 32,ML,95 Data "D Rock ",23,MC,75 Data "M Apple ",21,MC,80 Data "R Robbie",29,MR,77 Data "S Jones ",31,ATT,80 Data "G Lee ",38,ATT,75 Data "J Heywood",19,GK,70 ; Backup Team Data "C Geek ",20,DL,65 Data "M Fox ",21,DC,72 Data "D Kershaw",20,DC,68 Data "P Robin ",21,DR,66 Data "C Higgin ",22,ML,71 Data "A Reboot ",23,MC,76 Data "S Davis ",16,MC,65 ;<<< Youth Team Data "R Roger ",17,MR,80 Data "B Belly ",15,ATT,62 Data "L Wood ",16,ATT,64 Data "A Wood ",15,GK,70 Data "F Moon ",14,DL,60 Data "M Orange ",14,DC,62 --v