• Dear Cerberus X User!

    As we prepare to transition the forum ownership from Mike to Phil (TripleHead GmbH), we need your explicit consent to transfer your user data in accordance with our amended Terms and Rules in order to be compliant with data protection laws.

    Important: If you accept the amended Terms and Rules, you agree to the transfer of your user data to the future forum owner!

    Please read the new Terms and Rules below, check the box to agree, and click "Accept" to continue enjoying your Cerberus X Forum experience. The deadline for consent is April 5, 2024.

    Do not accept the amended Terms and Rules if you do not wish your personal data to be transferred to the future forum owner!

    Accepting ensures:

    - Continued access to your account with a short break for the actual transfer.

    - Retention of your data under the same terms.

    Without consent:

    - You don't have further access to your forum user account.

    - Your account and personal data will be deleted after April 5, 2024.

    - Public posts remain, but usernames indicating real identity will be anonymized. If you disagree with a fictitious name you have the option to contact us so we can find a name that is acceptable to you.

    We hope to keep you in our community and see you on the forum soon!

    All the best

    Your Cerberus X Team

1d tile map whats wrong?

Dubbsta

Active member
Joined
Jul 13, 2017
Messages
208
i found what seems like a great tutorial on tile based games and collisions. and of course right at the start it all hits rock bottom:oops:. i followed it exact and seems simple but not working as expected. can anyone tell me why this is not working. i cant spot it

Code:
Class Map



Field x:float = 0

Field y:float = 0

Field size:Int = 40

Field cols:Int = 16

Field rows:Int = 9

Field tiles:Int[] = [1,0,1,0,1,0,1,0,1,0,1,0,1,
                           0,0,0,0,0,0,0,0,0,0,0,0,0,
                           1,0,0,0,0,0,0,0,0,0,0,0,1,
                           0,0,0,0,0,0,0,0,0,0,0,0,0,
                           1,0,0,0,0,0,0,0,0,0,0,0,1,
                           0,0,0,0,0,0,0,0,0,0,0,0,0,
                           1,0,1,0,1,0,1,0,1,0,1,0,1]



                     Method Draw:Int()

                          For Local i:Int = 0 Until tiles.Length()

                                  DrawRect((i Mod cols) * size,Floor(i/cols)*size,size,size)

                                        Select tiles[i]

                                               Case 0
                                                    SetColor 0,255,0
                                               Case 1
                                                    SetColor 0,0,255
                                         End

                          next
                           Return 0
                       End

End
 
You need to call SetColor before you draw the rect:

Code:
Select tiles[i]
                Case 0
                    SetColor 0, 255, 0
                Case 1
                    SetColor 0,0,255
            End
       
            DrawRect((i Mod cols) * size,Floor(i/cols)*size,size,size)

and if I see right you defined a field with 13 cols and 7 rows.

Code:
Field cols:Int = 13
    Field rows:Int = 7

Which tutorial are you following?
 
Back
Top Bottom