Eclipse - Free 2D Mmorpg Maker
September 02, 2010, 10:21:59 PM *
Welcome, Guest. Please login or register.
Did you miss your activation email?

Login with username, password and session length
 
   Home   Shop Arcade chat Login Register  
 
 
   
 
Eclipse - Free 2D Mmorpg Maker | Eclipse | Scripting | Script Database (Moderators: Aksel, Captain evilbunnie) | Different Colored Chat Texts/Bubbles
collapse

* No Spam Or Websites

Refresh History
  • Ertzel: So... Anyone with basic/none/limited photoshop or even paint skills want to make some money converting sprites for me?
    Today at 10:07:35 PM
  • Gamma™: weaver why are you oflfine on H&H? :S
    Today at 10:04:26 PM
  • Ertzel: Ya, only one try per knife, my one try failed :(
    Today at 10:00:17 PM
  • LegendWeaver: is it one use?
    Today at 09:43:15 PM
  • Ertzel: Wish I didnt spend my 1k+ credits to buy the stupid knife that failed at stealing Robins credits >.<
    Today at 09:42:42 PM
  • Wraith: ) Kreator!
    Today at 09:06:52 PM
  • Wraith: yes! you were! (in red text
    Today at 09:06:46 PM
  • ToshiroHayate: Kreator!
    Today at 08:25:02 PM
  • Kreator: o_0 Was I supposed to Wraith?
    Today at 08:16:02 PM
  • [Pie] ICT: Don't worry.. I commented.
    Today at 07:55:08 PM
  • Wraith: Ay, kreator, wtf is up with you not posting anything about my new cliffs??
    Today at 07:50:36 PM

* Recent Topics

[EO] Attaching Problem. by 314piwm
[Today at 10:21:04 PM]
Project Vertigo [2d Tile-based Side-Scrolling Engine] by Miguu
[Today at 10:03:22 PM]
Zacaras Empire (Hiring) by Ertzel
[Today at 08:43:54 PM]
custom cliff tiles by ToshiroHayate
[Today at 08:29:15 PM]
.: RPG Kingdom :. by LegendWeaver
[Today at 08:25:20 PM]
What do you think? by [Pie] ICT
[Today at 07:54:54 PM]
[Show Off] Aztec Stuff by [Pie] ICT
[Today at 07:50:07 PM]
So I herd you liek mudkipz by Kreator
[Today at 07:36:52 PM]
Haven and Hearth: Epic Screenshot Thread by Tompwnage™
[Today at 07:14:21 PM]
The Lonliest Star [RP] by DDunit
[Today at 07:09:46 PM]

* Who's Online


Site Author : Topic: Different Colored Chat Texts/Bubbles  (Read 4304 times)
0 Members and 1 Guest are viewing this topic.
October 29, 2006, 02:07:22 PM
Topher
Active Member
***
User No : 1214
Posts: 199
  • 0 credits
  • View Inventory
  • Send Money To Topher
    • Location : USA
    • View Profile


    Hey everyone....here's a simple little script (copmmands actually) that has a pretty cool result :D

    To install, simple paste the following below the /warpto command in your Sub Commands

    Code: [Select]
    If LCase(Mid(TextSay, 1, 4)) = "/red" Then
    If Len(TextSay) > 4 Then
    TextSay = Mid(TextSay, 5, Len(TextSay) - 4)
    Call TextBubble(index, 1, Trim(TextSay), GetPlayerMap(index), GetPlayerX(index), GetPlayerY(index), 12)
    Call MapMsg(GetPlayerMap(index), GetPlayerName(index) & " : " & Trim(TextSay), 12)
    End If
    Exit Sub
    End If

    If LCase(Mid(TextSay, 1, 7)) = "/yellow" Then
    If Len(TextSay) > 7 Then
    TextSay = Mid(TextSay, 8, Len(TextSay) - 7)
    Call TextBubble(index, 1, Trim(TextSay), GetPlayerMap(index), GetPlayerX(index), GetPlayerY(index), 14)
    Call MapMsg(GetPlayerMap(index), GetPlayerName(index) & " : " & Trim(TextSay), 14)
    End If
    Exit Sub
    End If

    If LCase(Mid(TextSay, 1, 5)) = "/cyan" Then
    If Len(TextSay) > 5 Then
    TextSay = Mid(TextSay, 6, Len(TextSay) - 5)
    Call TextBubble(index, 1, Trim(TextSay), GetPlayerMap(index), GetPlayerX(index), GetPlayerY(index), 11)
    Call MapMsg(GetPlayerMap(index), GetPlayerName(index) & " : " & Trim(TextSay), 11)
    End If
    Exit Sub
    End If

    If LCase(Mid(TextSay, 1, 5)) = "/lime" Then
    If Len(TextSay) > 5 Then
    TextSay = Mid(TextSay, 6, Len(TextSay) - 5)
    Call TextBubble(index, 1, Trim(TextSay), GetPlayerMap(index), GetPlayerX(index), GetPlayerY(index), 10)
    Call MapMsg(GetPlayerMap(index), GetPlayerName(index) & " : " & Trim(TextSay), 10)
    End If
    Exit Sub
    End If

    And if all went according to plan, when you type
    /red <MESSAGE HERE>
    /yellow <MESSAGE HERE>
    /cyan <MESSAGE HERE>
    or
    /lime <MESSAGE HERE>

    Not only will everyone on your map get a nice message in that color....a text bubble with the correspoding color will appear! Enjoy, and feel free to add your own :D

    Topher
    « Last Edit: January 19, 2007, 12:21:09 PM by Godlord » Logged
    Mindbeast!
    October 29, 2006, 03:05:57 PM
    l0lz!
    Contest Winner
    Advanced Eclipser
    *
    User No : 1532
    Posts: 1483
  • 272 credits
  • View Inventory
  • Send Money To l0lz!
    • View Profile
    Pretty awsome :)
    Logged
    October 29, 2006, 04:10:39 PM
    Topher
    Active Member
    ***
    User No : 1214
    Posts: 199
  • 0 credits
  • View Inventory
  • Send Money To Topher
    • Location : USA
    • View Profile
    Thanks :)
    Logged
    Mindbeast!
    October 31, 2006, 10:26:59 PM
    Ilnair
    The Uber-Scriptor
    Advanced Member
    ****
    User No : 375
    Posts: 590
  • 0 credits
  • View Inventory
  • Send Money To Ilnair
    • Location : Netherlands, The
    The Uber-Scriptor
    • View Profile
    • WWW
    Nice work, keep it up, we need more scripters around :)
    Logged
    Ilnair
    Uber-Scriptor

    Nishansu, beta testing. Have a look at http://www.nishansu.com
    November 01, 2006, 05:54:03 PM
    Topher
    Active Member
    ***
    User No : 1214
    Posts: 199
  • 0 credits
  • View Inventory
  • Send Money To Topher
    • Location : USA
    • View Profile
    Yeah...I try to make new ideas..not make new versions of existing scripts

    btw..Thanks :D
    Logged
    Mindbeast!
    November 01, 2006, 06:04:19 PM
    Brutal - Zeldo
    Ex-Eclipse Programmer
    Veteran
    Active Member
    *
    User No : 1283
    Posts: 303
  • 0 credits
  • View Inventory
  • Send Money To Brutal - Zeldo
    • Pie
    • View Profile
    Very nice job and GL with future scripting
    Logged
    November 06, 2006, 12:03:05 AM
    Timus
    Custom GFX'erer
    Advanced Eclipser
    *****
    User No : 788
    Posts: 1275
  • 0 credits
  • View Inventory
  • Send Money To Timus
    • Location : My Computer...
    • View Profile
    Yeah nice, this will be very helpful.
    Logged
    Quote from: Frog  on September 16, 2006, 01:10:25 PM

    I recon u hav a nack for gfx.  :D

    PIRATEZ Online:
     Overall: 80%
    March 27, 2007, 07:32:19 AM
    drunk_on_cheese
    Indeed.
    Active Member
    ***
    User No : 2053
    Posts: 411
  • 0 credits
  • View Inventory
  • Send Money To drunk_on_cheese
    • Location : Look behind you ;)
    • View Profile
    yes, that is a very helpful script. I was tired of the old color. Good job! =)
    Logged
    </sig>
    April 17, 2009, 04:04:01 AM
    Kim
    Newb
    *
    User No : 12012
    Posts: 6
  • 0 credits
  • View Inventory
  • Send Money To Kim
    • View Profile
    Ah well where should I paste this code? I mean I got 2 text's that says "/warpto"

    1One: Call PlayerMsg(Index, "Available Commands: /admin, /loc, /mapeditor, /warpmeto, /warptome, /warpto, /setsprite, /mapreport, /kick, /ban, /edititem, /respawn, /editnpc, /motd, /editshop, /ban, /editspell", WHITE)
             End If
             Exit Sub

    2. Case "/warpto"
             If GetPlayerAccess(Index) > 0 Then
                MapNum = TextSay(1)

                If MapNum > 0 And MapNum <= MAX_MAPS Then
                   Call PlayerWarp(Index, MapNum, GetPlayerX(Index), GetPlayerY(Index))
                   Call PlayerMsg(Index, "You have been warped to map #" & MapNum & ".", BRIGHTBLUE)
                Else
                   Call PlayerMsg(Index, "Invalid map number.", BRIGHTRED)
                End If
             End If
             Exit Sub
       End Select





    Would be Great If Some1 Can Help me  :azn: Thanks
    Logged
    April 17, 2009, 04:39:38 AM
    Tyr
    Advanced Eclipser
    *****
    User No : 7407
    Posts: 1471
  • 224 credits
  • View Inventory
  • Send Money To Tyr
    • Location : Belgium
    In Flames we trust!
    • View Profile
    this is... a  HUGE necro!
    Logged

    powered by last.fm
    April 17, 2009, 04:46:10 AM
    .:Ev1ltyphoon:.
    Veteran
    Advanced Member
    *
    User No : 78
    Posts: 685
  • 72 credits
  • View Inventory
  • Send Money To .:Ev1ltyphoon:.
    • Location : Belgium
    • View Profile
    There re no necros in Script database.

    @Kim:
    Use the second. But this script will no longer work with EE 2.7 because it uses a different method for commands.
    Logged


    Quote from: Azkanan on October 24, 2009, 04:27:46 PM
    "Humans are beautiful, but humanity is not."
    April 17, 2009, 05:04:42 AM
    ÅÐмiядζ ЯĢ€
    █☻█
    Administrator
    Epic Poster
    *
    User No : 440
    Posts: 8768
  • 494 credits
  • View Inventory
  • Send Money To ÅÐмiядζ ЯĢ€
    • Location : Delaware, USA
    The Admiral.
    • View Profile
    I'm pretty sure it can be easily converted to EE though.

    Also, Kim, welcome to Eclipse :)
    Logged
    I no longer offer engine support through PMs.  If you need help, please do so by posting in the correct board, thank you.
    I also do not grant "Moderator" or "Administrator" requests; such a PM will be ignored.

    Quote from: IceCream Tuesday on August 24, 2007, 10:44:37 PM
    Remember that marshmallow from Ghost Busters? marsh is a Canadian version of that.

    And thus paperdoll was born! | Sub: "Destroy Game" | Evolve 4.0 -- Evolving Simulaton! | Script Index - Almost ALL of Eclipse's ScriptsOkay, if you are not open-minded, then stop reading...
    Guess what? Telekinesis, Pyrokinesis, Cryokinesis, Hydrokinesis, Electrokinesis, Psychokinesis, Telepathy, Empathy, Energy Balls, Energy Shields, Remote Viewing, and more IS POSSIBLE! If you have an open mind, and willing to TRY IT YOURSELF, then  read THIS FREE BOOK I've compiled myself!
    Quote from: Blanco on July 25, 2008, 01:39:41 AM
    Hello! I am French and I have found my happiness on your software.
    April 19, 2009, 03:43:29 AM
    Kim
    Newb
    *
    User No : 12012
    Posts: 6
  • 0 credits
  • View Inventory
  • Send Money To Kim
    • View Profile
    Quote from: Ace of Typhoons on April 17, 2009, 04:46:10 AM
    There re no necros in Script database.

    @Kim:
    Use the second. But this script will no longer work with EE 2.7 because it uses a different method for commands.


    oh okey :/

    and thanks for the welcome ^^
    Logged
    July 14, 2009, 11:36:23 AM
    Bobosk
    Veteran
    Advanced Eclipser
    *
    User No : 192
    Posts: 1600
  • 120 credits
  • View Inventory
  • Send Money To Bobosk
    • View Profile
    Here's a version of this script for EE 2.7/8.

    Add
    Code: [Select]
    Dim TextBubbleSay to the "dim" area of your commands sub

    Code: [Select]
          Case "/Red"
             For x = 1 To UBound(TextSay)
             TextBubbleSay = TextBubbleSay + " " + TextSay(x)
             Next
             Call MapMsg(GetPlayerMap(index), GetPlayerName(index) & " : " & TextBubbleSay, 12)
             Call TextBubble(index, 1, TextBubbleSay, GetPlayerMap(index), GetPlayerX(index), GetPlayerY(index), 12)
          Exit Sub

          Case "/Yellow"
             For x = 1 To UBound(TextSay)
             TextBubbleSay = TextBubbleSay + " " + TextSay(x)
             Next
             Call MapMsg(GetPlayerMap(index), GetPlayerName(index) & " : " & TextBubbleSay, 14)
             Call TextBubble(index, 1, TextBubbleSay, GetPlayerMap(index), GetPlayerX(index), GetPlayerY(index), 14)
          Exit Sub

          Case "/Cyan"
             For x = 1 To UBound(TextSay)
             TextBubbleSay = TextBubbleSay + " " + TextSay(x)
             Next
             Call MapMsg(GetPlayerMap(index), GetPlayerName(index) & " : " & TextBubbleSay, 11)
             Call TextBubble(index, 1, TextBubbleSay, GetPlayerMap(index), GetPlayerX(index), GetPlayerY(index), 11)
          Exit Sub

          Case "/Lime"
             Dim TextBubbleSay
             For x = 1 To UBound(TextSay)
             TextBubbleSay = TextBubbleSay + " " + TextSay(x)
             Next
             Call MapMsg(GetPlayerMap(index), GetPlayerName(index) & " : " & TextBubbleSay, 10)
             Call TextBubble(index, 1, TextBubbleSay, GetPlayerMap(index), GetPlayerX(index), GetPlayerY(index), 10)
          Exit Sub    This might cause a RTE 9.. Not sure.. xD
    Logged
    July 15, 2009, 08:06:12 PM
    Urame Hinote
    Advanced Coder
    Active Member
    ***
    User No : 9084
    Posts: 367
  • 58 credits
  • View Inventory
  • Send Money To Urame Hinote
    • View Profile
    Quote from: Bobosk on July 14, 2009, 11:36:23 AM
    Here's a version of this script for EE 2.7/8.

    Add
    Code: [Select]
    Dim TextBubbleSay to the "dim" area of your commands sub

    Code: [Select]
          Case "/Red"
             For x = 1 To UBound(TextSay)
             TextBubbleSay = TextBubbleSay + " " + TextSay(x)
             Next
             Call MapMsg(GetPlayerMap(index), GetPlayerName(index) & " : " & TextBubbleSay, 12)
             Call TextBubble(index, 1, TextBubbleSay, GetPlayerMap(index), GetPlayerX(index), GetPlayerY(index), 12)
          Exit Sub

          Case "/Yellow"
             For x = 1 To UBound(TextSay)
             TextBubbleSay = TextBubbleSay + " " + TextSay(x)
             Next
             Call MapMsg(GetPlayerMap(index), GetPlayerName(index) & " : " & TextBubbleSay, 14)
             Call TextBubble(index, 1, TextBubbleSay, GetPlayerMap(index), GetPlayerX(index), GetPlayerY(index), 14)
          Exit Sub

          Case "/Cyan"
             For x = 1 To UBound(TextSay)
             TextBubbleSay = TextBubbleSay + " " + TextSay(x)
             Next
             Call MapMsg(GetPlayerMap(index), GetPlayerName(index) & " : " & TextBubbleSay, 11)
             Call TextBubble(index, 1, TextBubbleSay, GetPlayerMap(index), GetPlayerX(index), GetPlayerY(index), 11)
          Exit Sub

          Case "/Lime"
             For x = 1 To UBound(TextSay)
             TextBubbleSay = TextBubbleSay + " " + TextSay(x)
             Next
             Call MapMsg(GetPlayerMap(index), GetPlayerName(index) & " : " & TextBubbleSay, 10)
             Call TextBubble(index, 1, TextBubbleSay, GetPlayerMap(index), GetPlayerX(index), GetPlayerY(index), 10)
          Exit Sub    This might cause a RTE 9.. Not sure.. xD
    I changed one small thing, even tho Bobosk did a really good job of making this work for 2.7/8, he missed one thing(Sorry if I'm annoying you Bobosk >.<)
    Fixed in the quote, smallest error in sadscript.
    You should only give the original creator and Bobosk credit tho, I hardly did anything.
    Logged
    January 02, 2010, 05:34:58 AM
    Dragonlord11
    Member
    **
    User No : 15760
    Posts: 52
  • 0 credits
  • View Inventory
  • Send Money To Dragonlord11
    • View Profile
    • WWW
    I have a problem, by me isn't the Text in the speech bubble.
    sry for my english  :embarrassed:
    Logged
     
    Powered by MySQL Powered by PHP Powered by SMF 2.0 RC3 | SMF © 2006–2010, Simple Machines LLC
    SimplePortal 2.3.1 © 2008-2009, SimplePortal     		Valid XHTML 1.0! Valid CSS!
    Page created in 0.378 seconds with 29 queries.