Jump to content
Search In
  • More options...
Find results that contain...
Find results in...

evilbunnie

Members
  • Posts

    1486
  • Joined

  • Last visited

    Never

Posts posted by evilbunnie

  1. I really don't think our opinion matters. You should go for what you enjoy and feel comfortable with. I feel as if you should make your own engine with C++. You'd get a feel for the mechanics of engine making, you'll learn more things, more than you would with a pre-made engine.

    Once you've gotten better, you can restart using WINAPI and OpenGL, which is MUCH better than Allegro.
  2. @DopeyBiach:

    > Cheers again Wabbit, now I get:
    >
    > "Compile Error:"
    > "Only comments may appear after End Sub, End Function or End Property"
    >
    > Here:
    > ```
    > Public PetMapCache(1 To MAX_MAPS) As PetCache
    >
    > Public Type PetCache
    >     Pet(1 To MAX_MAP_NPCS) As Long
    >     UpperBound As Long
    > End Type
    > ```
    > Ugh sorry for being such a pain, I really should've learnt more VB before I starting piling my porblems onto other people, am learning though, slowly.

    Oh lord. You've really fucked everything up, post the WHOLE module that this is in.
  3. Define it in order, like this.

    ```
    Public PetMapCache(1 To MAX_MAPS) As PetCache

    Public Type PetCache
        Pet(1 To MAX_MAP_NPCS) As Long
        UpperBound As Long
    End Type

    Sub PetDisband(ByVal index As Long, ByVal MapNum As Long)
        Dim i As Long, j As Long

        If TempPlayer(index).TempPetSlot < 1 Then Exit Sub

        'Cache the Pets for players logging on [Remove Number from array]
        'THIS IS KINDA SLOW (EVEN WITHOUT TESTING, LOL), MAY HAVE TO CONVERT TO LINKED LIST FOR SPEED
        For i = 1 To PetMapCache(MapNum).UpperBound
            If PetMapCache(MapNum).Pet(i) = TempPlayer(index).TempPetSlot Then
                If PetMapCache(MapNum).UpperBound > 1 Then
                    For j = PetMapCache(MapNum).UpperBound To i Step -1
                        PetMapCache(MapNum).Pet(j - 1) = PetMapCache(MapNum).Pet(j)
                    Next
                Else
                    PetMapCache(MapNum).Pet(1) = 0
                End If

                PetMapCache(MapNum).UpperBound = PetMapCache(MapNum).UpperBound - 1
                Exit For
            End If
        Next

        Call ClearSingleMapNpc(TempPlayer(index).TempPetSlot, MapNum)
        Map(GetPlayerMap(index)).NPC(TempPlayer(index).TempPetSlot) = 0
        TempPlayer(index).TempPetSlot = 0

        're-warp the players on the map
        For i = 1 To Player_HighIndex
            If IsPlaying(i) Then
                If GetPlayerMap(i) = GetPlayerMap(index) Then
                    Call PlayerWarp(i, GetPlayerMap(i), GetPlayerX(i), GetPlayerY(i))
                    SendPlayerData index
                End If
            End If
        Next
    End Sub

    ```
  4. @Robin:

    > Why in God's name would you explain what a variable is?

    Wanted to let out all my emotions, after that 24 hours of straight torture you put me through.
  5. Basically, dim tells the system to reserve space for a specific data type to be used later on in the program. So once dimmed it would hold a specific data type. So, integer would hold whole numbers, long is really just int32, meaning it's an integer that can hold more numbers than the former.

    Byte holds whole numbers up to 255, used when you don't need to use as much memory as an integer would, in exchange for the inability to store numbers more than 255\. An integer or long is actually made up of bytes.

    A string is just an array of characters, each character being a byte large, so I would use them carefully as doing intensive operations with strings is very memory consuming. This is a string, "Hello, this is a string". so using dim as the case, to use them you would do.
    ```
    dim tmpStr as string
    tmpStr = "Everything within the quotes is part of the string"

    ```
    This is just a brief, so as Robin said I'd probably go and google them some more to understand better.
  6. @Robin:

    > Ahaha. +1 to you. Don't you find it hilarious when someone learns something and then suddenly talks down to others about it?
    >
    > PM me some time and we can go through his old posts together and look at what _he_ thought would be appropriate to release on here when he first started. ;]

    I didn't release them in the show off board, they weren't notepads. I never said that he can't post useless tutorials that resets the engine through a command(my first ever tutorial), in the source board.

    Do it bro, dignity still here.

    edit: Back from my ban, sorry Master Robin, I will never be bad on this forums again :(
×
×
  • Create New...