multiple 2-player maps

[billybob884]

i need to change the beginning of this section so that it will recognize 4 maps as two player instead of recognizing every other map as not multiplayer.

Code: [Select]

'Two Player Stuff

    If ProjectObj.GamePlayer.rMap.Name <> "0-4LevelSelect" Then
        intSprTwo = -1
        oPlayer.ScrollMarginY = 185
    Else
        Set oLayer = oMap.MapLayer(1)
        If intSprTwo < 0 Then
            For i = 0 To oLayer.SpriteCount - 1
                If oLayer.Sprite(i).rDef.Name = "Player2" Then intSprTwo = i
            Next
        End If
        With oLayer.Sprite(intSprTwo)
            oPlayer.ScrollMarginY = 62
            If .ProcessAction(P2Actions) Then
                .CurState = (.CurState Mod (.rDef.Template.StateCount \ 2)) _
                            + .rDef.Template.StateCount \ 2
                .CurFrame = .CurFrame Mod .rDef.StateFrameCount(.CurState)
            Else
                .CurState = (.CurState Mod (.rDef.Template.StateCount \ 2))
            End If
            oMap.ViewTop = 240
            If P2OffsetX + oPlayer.ScrollMarginX > .X Then
                P2OffsetX = .X - oPlayer.ScrollMarginX
            End If
            If P2OffsetX + oMap.ViewWidth - oPlayer.ScrollMarginX < .X + nSprWidth Then
                P2OffsetX = .X - oMap.ViewWidth + oPlayer.ScrollMarginX + nSprWidth
            End If
            If P2OffsetY + oPlayer.ScrollMarginY > .Y Then
                P2OffsetY = .Y - oPlayer.ScrollMarginY
            End If
            If P2OffsetY + oMap.ViewHeight - oPlayer.ScrollMarginY < .Y + nSprHeight Then
                P2OffsetY = .Y - oMap.ViewHeight + oPlayer.ScrollMarginY + nSprHeight
            End If
            If P2OffsetX < 0 Then P2OffsetX = 0
            If P2OffsetY < 0 Then P2OffsetY = 0
            nLyrWid = oLayer.Columns * 32
            nLyrHgt = oLayer.Rows * 32
            If P2OffsetX > nLyrWid - oMap.ViewWidth Then P2OffsetX = nLyrWid - oMap.ViewWidth
            If P2OffsetY > nLyrHgt - oMap.ViewHeight Then P2OffsetY = nLyrHgt - oMap.ViewHeight
            oMap.Draw P2OffsetX, P2OffsetY, False
            oMap.ViewTop = 0
        End With
    End If

i tried changing this part

Code: [Select]

'Two Player Stuff

    If ProjectObj.GamePlayer.rMap.Name <> "0-4LevelSelect" Then
        intSprTwo = -1
        oPlayer.ScrollMarginY = 185
    Else

to this, but it kept giving me a syntax error

Code: [Select]

'Two Player Stuff

    If ProjectObj.GamePlayer.rMap.Name <> "0-4LevelSelect" or If ProjectObj.GamePlayer.rMap.Name <> "map1" or If ProjectObj.GamePlayer.rMap.Name <> "map2" or If ProjectObj.GamePlayer.rMap.Name <> "map3" Then
        intSprTwo = -1
        oPlayer.ScrollMarginY = 185
    Else

i kinda hada  feeling that this wouldn't work, but i gave it a shot anyway.

[durnurd]

I believe all you need to do is remove the subsequent "If"s.  So it should be

Code: [Select]

If ProjectObj.GamePlayer.rMap.Name <> "0-4LevelSelect" or ProjectObj.GamePlayer.rMap.Name <> "map1" or ProjectObj.GamePlayer.rMap.Name <> "map2" or ProjectObj.GamePlayer.rMap.Name <> "map3" Then

[billybob884]

hmm, well that stopped the syntax error, but now none of the maps specified are being displayed as 2 player

[bluemonkmn]

I finally bothered to look up the name of the law being violated, but won't go into the messy details of DeMorgan's law.  To put it shortly, I think you have to change the "Or"s to "And"s.

[billybob884]

yep, that fixed it!

[billybob884]

heres something i just thought of. since its drawing the map twice, if i have any visible inventory on it, is it going to try to draw that twice as well?

[bluemonkmn]

If I recall correctly, drawing the inventory is a function of the player and not of the map, so drawing the map twice will not draw the inventory twice.  I believe the 2-player demo script that I posted had extra script code specifically for drawing player 2's inventory because it wasn't drawn with the map.

[billybob884]

nah, player two wont have any inventory, there will just be 2 timers at the top, and each will be stopped when the corresponding player hits the "invisible" sprite at the finish line

[billybob884]

ok, having a small problem with this. i've finally started working on the levels, and i changed the or's to ands like stated above, but the 3 subsequent maps wont work. when i open them it crashes and gives me the messages:

Error playing map: Tried to draw text when no drawing surface is available [OK]

Script stopped at line 99 on character 9: Subscript out of range [OK]

i believe line 99 is
        With oLayer.Sprite(intSprTwo)


---edit---

ok, i figured out the problem; in the level select, there is only 1 layer behing Main, and in the multi there are 2, so how do i change the number of layers behind the main (in the script)

Code: [Select]

'Two Player Stuff

If ProjectObj.GamePlayer.rMap.Name <> "7-1MultiButtRace" and ProjectObj.GamePlayer.rMap.Name <> "0-4LevelSelect" and ProjectObj.GamePlayer.rMap.Name <> "7-2MultiLawnMower" and ProjectObj.GamePlayer.rMap.Name <> "7-3MultiChainsawSkate" Then 
        intSprTwo = -1
        oPlayer.ScrollMarginY = 185
    Else
        Set oLayer = oMap.MapLayer(1)
        If intSprTwo < 0 Then
            For i = 0 To oLayer.SpriteCount - 1
                If oLayer.Sprite(i).rDef.Name = "Player2" Then intSprTwo = i
            Next
        End If
        With oLayer.Sprite(intSprTwo)
            oPlayer.ScrollMarginY = 62
            If .ProcessAction(P2Actions) Then
                .CurState = (.CurState Mod (.rDef.Template.StateCount \ 2)) _
                            + .rDef.Template.StateCount \ 2
                .CurFrame = .CurFrame Mod .rDef.StateFrameCount(.CurState)
            Else
                .CurState = (.CurState Mod (.rDef.Template.StateCount \ 2))
            End If
            oMap.ViewTop = 240
            If P2OffsetX + oPlayer.ScrollMarginX > .X Then
                P2OffsetX = .X - oPlayer.ScrollMarginX
            End If
            If P2OffsetX + oMap.ViewWidth - oPlayer.ScrollMarginX < .X + nSprWidth Then
                P2OffsetX = .X - oMap.ViewWidth + oPlayer.ScrollMarginX + nSprWidth
            End If
            If P2OffsetY + oPlayer.ScrollMarginY > .Y Then
                P2OffsetY = .Y - oPlayer.ScrollMarginY
            End If
            If P2OffsetY + oMap.ViewHeight - oPlayer.ScrollMarginY < .Y + nSprHeight Then
                P2OffsetY = .Y - oMap.ViewHeight + oPlayer.ScrollMarginY + nSprHeight
            End If
            If P2OffsetX < 0 Then P2OffsetX = 0
            If P2OffsetY < 0 Then P2OffsetY = 0
            nLyrWid = oLayer.Columns * 32
            nLyrHgt = oLayer.Rows * 32
            If P2OffsetX > nLyrWid - oMap.ViewWidth Then P2OffsetX = nLyrWid - oMap.ViewWidth
            If P2OffsetY > nLyrHgt - oMap.ViewHeight Then P2OffsetY = nLyrHgt - oMap.ViewHeight
            oMap.Draw P2OffsetX, P2OffsetY, False
            oMap.ViewTop = 0
        End With
    End If

[bluemonkmn]

I'm not entirely sure I understand, but I think I do, and I'm going to guess that you need to change this line:

Code: [Select]

Set oLayer = oMap.MapLayer(1)to something like this:

Code: [Select]

If oMap.Name = "0-4LevelSelect" Then Set oLayer = oMap.MapLayer(1) Else Set oLayer = oMap.MapLayer(2)

[billybob884]

yea, thats probbly it, or i could just change it to 2 for all, then just put blank layers in on hte maps that dont need multiple bg's

[bluemonkmn]

By the way, you can also refer to the layer by name if you name the player layer the same thing on all your 2-player maps:

Code: [Select]

Set oLayer = oMap.MapLayer("Main")

[billybob884]

there we go, thats what i needed. one more question, if i have a function that deletes the 2nd player sprite, will the script freak out and crash? becasue im probably gonna have 'inert' players at teh start for a little 3-2-1-GO at the beginning of each race, ya know?

[durnurd]

I think the easiest way to find out would be to try.  To get around that problem (if it does happen, which I think it will), you would probably have to catch that when it happens (in a Player_OnSpecialFunction event) and reset the sprite index.

The reason it will probably happen is because the player 2 sprite is kept track of my an integer index into the list of sprites.  Deleting that sprite and re-creating it later will change the index, even if the name stays the same (though I don't see how it could have the same name).  How exactly were you planning on having the script keep track of which sprite was the new player sprite?

[billybob884]

well it was only going to switch once, originally there would be 2 sprites that didnt move, one for each player, then ater the GO sound played it would switch to the 2 player sprites that each player could move
i tried having a global modal sound play, which sort of works, but it stops any of hte map from being viewable (the whole thing shows up as black untill the sound is over, then it appears).