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

gdog12356

Members
  • Posts

    684
  • Joined

  • Last visited

    Never

Posts posted by gdog12356

  1. @‭‭‭Marsh:

    > Was it the same weed you smoked on the other occassions? Sounds odd to me. Ive been pretty damn high but nevet had a time skip.

    I can phrase the time skip as the images to my brain were slowed down, so it was like choppy o-o. But i think i may have mixed two kinds i know one of them was sour og kush. I dont know if the first hit i took was also og kush but im going to go with no.

    All i know now is that i got pretty damn high. xD. Although the choppy time-skips were pretty cool especially when i was riding my bike xD.
  2. @SnowShinobi:

    > I **almost never** use quests as a main mechanic in gameplay.

    What is this, I don't even.

    On topic:

    Yeah, I think a mixture of both existing and original creatures would benefit the game although there are benefits to having each. For on if you are using all original Creatures the player can connect with the world and learn new things about it. Like they might be interested in it. If you use a mixture the player has a stronger connection with the game as he/she already knows some of the contents.
  3. Okay so I've smoked weed before, 4 times but that was like 3 months ago. I never got 'really high' i would feel it, but in no way compared to how i felt yesterday. So yesterday me and a group of friends went to the woods and I took the 3rd hit the first time, then the leftovers. Then i took the 2nd hit for the 3rd hit i had. And that's when I start trippin'. Lol, at first all I felt was this feeling in my head and everything went black. I had to really focus on reality to even walk. I was so hot, and sweaty but it went away later. I was actually surprised i could ride my bike after that xD. Holy shit the time skips were sick as duck, i remember i was riding my bike with the time skips and was like this is ducking awesome. My arms felt like the were dangling off my shoulders and not actually there. It was crazy. But I knew i wouldn't be able to handle all of this plus it was getting late so I knew my only chance of not getting caught, was to come home. I had a change of clothing i brought just so my parents wouldn't smell it, so i changed. I came home about 30mins into it. And went to my room, saying I had a headache. So i laid in bed for 4 hours, of course the time skips made it not as bad, in what i thought was second when I checked the clock was 10 minutes. But the nice feeling I had at the beginning when i was laying down soon started to become an annoyance. Maybe it was because I couldn't enjoy it and I was forced to hide it but I remember my body limbs were so heavy and when i was laying down i could never become comfortable, and my stomach felt like it was swirling and when i had my eyes closed I envisioned my body laying there with weird ass visuals everywhere almost like a light show o-o. But not when i had my eyes open. Would i have enjoyed the feeling more if i had been able to sleep at a friends house not needing to worry about being caught?

    Tldr;
    I basically smoked weed and got higher than i had ever been like REALLY ducking HIGH, at first it was enjoyable but soon came a realization that i wouldn't be able to go anywhere to hang out. I would have been walking around town with my friends, which i was doing but then knew I wouldn't be able to continue because i thought i was going to do something retarded. So i went home. I was laying in bed for 3 hours waiting for it to go away, If i had had friends I could have stayed with instead of going home would the feeling have been more enjoyable?

    edit: Forgot to mention another reason I came home was because It was getting late and if I were to go somewhere and like pass out or something my parents would freak out and go looking for me. So to save the trouble of that I came home.
  4. @General-Pony:

    > 0r y0u c0u1d F1x 7h3m y0urs31v35\. 1m r3411y 51ck 0f h34r1n9 y0u c0mp141n 4cr055 th3 f0rum th4t y0u w4n7 0r191n5 t0 h4v3 m0r3 f347ur35\. S70p duck1n9 wh1n1n9 4nd pr0gr4m th3m 1n y0urs31f, w3 ar3 n0t h3r3 t0 m4k3 y0ur g4m3 f0r y0u.

    134rn 2 1337 Sp34k…
  5. It looks like you tried to make a game while taking acid… heck, It looks like the point of the game is taking acid and trying to do normal things but instead your doing the most retarded things you've never seen.
  6. Ok well I don't think anyone released this yet so I figured I would release it.

    So here we will start with the server:

    In the server you will want to navigate to Private Sub HandleNewAccount.

    under

    ```
    Dim Password As String
    ```
    add

    ```
    Dim Password2 As String
    ```
    next find

    ```
    Password = Buffer.ReadString
    ```
    and under it add

    ```
    Password2 = Buffer.ReadString
    ```
    Now find your way to

    ```
                ' Prevent hacking
                For i = 1 To Len(Name)
                    n = AscW(Mid$(Name, i, 1))

                    If Not isNameLegal(n) Then
                        Call AlertMsg(index, "Invalid name, only letters, numbers, spaces, and _ allowed in names.")
                        Exit Sub
                    End If

                Next
    ```
    under that whole thing, add

    ```
                If IsPassTheSame(Password, Password2) = False Then
                    Call AlertMsg(index, "Passwords Do Not Match.")
                    Exit Sub
                End If

    ```
    This is checking if the two passwords match, and it will read form the data sent to the server from the client. Now we want to actually add the function so…

    In ModServerTCP add this function to the bottom
    ```
    Function IsPassTheSame(ByVal Password As String, ByVal Password2 As String) As Boolean

            If UCase$(Trim$(Password)) = UCase$(Trim$(Password2)) Then
              IsPassTheSame = True
            Else
            IsPassTheSame = False
            End If

    End Function
    ```
    Now, open up your client and navigate to Public Sub MenuState

    change```
                    Call SendNewAccount(sUser, sPass)

    ```to

    ```
                    Call SendNewAccount(sUser, sPass, sPass2)

    ```
    Now replace Public Sub SendNewAccount with this:
    ```
    ' *****************************
    ' ** Outgoing Client Packets **
    ' *****************************
    Public Sub SendNewAccount(ByVal name As String, ByVal Password As String, ByVal Password2 As String)
    Dim Buffer As clsBuffer

        ' If debug mode, handle error then exit out
        If Options.Debug = 1 Then On Error GoTo errorhandler

        Set Buffer = New clsBuffer
        Buffer.WriteLong CNewAccount
        Buffer.WriteString name
        Buffer.WriteString Password
        Buffer.WriteString Password2
        Buffer.WriteLong CLIENT_MAJOR
        Buffer.WriteLong CLIENT_MINOR
        Buffer.WriteLong CLIENT_REVISION
        SendData Buffer.ToArray()
        Set Buffer = Nothing

        ' Error handler
        Exit Sub
    errorhandler:
        HandleError "SendNewAccount", "modClientTCP", Err.Number, Err.Description, Err.Source, Err.HelpContext
        Err.Clear
        Exit Sub
    End Sub

    ```
    What this does is send the data in the confirmation field to the server to be checked.

    And walla! Your all done! No need to give credit's if you use this as it was easy as fuck but it would much appreciated. :).
×
×
  • Create New...