Eclipse
January 05, 2009, 10:20:16 PM *
Welcome, Guest. Please login or register.
Did you miss your activation email?

Login with username, password and session length
News:
 
   Home   Chat Help Rules Arcade Search Calendar Gallery Login Register  
 
 
 
Recent Topics +-
Disparity Recruiting by The Roujo
Today at 10:20:14 PM
World of Hyrule - Official Topic by Kreator
Today at 10:14:43 PM
Actual Map for the continents by Kreator
Today at 10:14:31 PM
Lostica [Project Revamp] by Kreator
Today at 10:12:58 PM
Free movies? by DrNova
Today at 10:10:40 PM
~ Paradise uncharted ~ Supported by Dezire Software Forums by slym
Today at 10:07:06 PM
I need a little help by waffletamer
Today at 10:03:40 PM
Okay Questions (very noob person here) by The Roujo
Today at 09:48:45 PM
fun with photoshop by MrMiguu™
Today at 09:48:19 PM
stackable items? by MrMiguu™
Today at 09:45:06 PM
Members Online +-
12 Guests, 21 Users
The Roujo,
Ambard,
Sablefalcon,
kira423,
shakadaran,
HawkStorm95,
Gwendalin,
FS:CG Admin[Shadowwulf],
dg1423,
Kreator,
DrNova,
‪‫‬‭‮‪‫Kusy,
Devogen,
hammer,
slym,
Haruhito,
Catcatcat,
Simius Cruentus,
ralir,
Amperglyph,
MrMiguu™
Pages: [1]
« previous next »
  Print  
Author Topic: Different Colored Chat Texts/Bubbles  (Read 1865 times)
0 Members and 1 Guest are viewing this topic.
Topher
Active Member
***
Offline Offline

Posts: 203



View Profile Email
« on: October 29, 2006, 02:07:22 PM »


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
l0lz!
I <3 Photoshop
Veteran
Advanced Eclipser
*
Offline Offline

Posts: 1,149



View Profile WWW Email
« Reply #1 on: October 29, 2006, 03:05:57 PM »
Pretty awsome :)
Topher
Active Member
***
Offline Offline

Posts: 203



View Profile Email
« Reply #2 on: October 29, 2006, 04:10:39 PM »
Thanks :)
Ilnair
The Uber-Scriptor
Advanced Member
****
Offline Offline

Posts: 592


The Uber-Scriptor


View Profile WWW Email
« Reply #3 on: October 31, 2006, 10:26:59 PM »
Nice work, keep it up, we need more scripters around :)
Topher
Active Member
***
Offline Offline

Posts: 203



View Profile Email
« Reply #4 on: November 01, 2006, 05:54:03 PM »
Yeah...I try to make new ideas..not make new versions of existing scripts

btw..Thanks :D
Brutal - Zeldo
Ex-Eclipse Programmer
Global Moderator
Active Member
*
Offline Offline

Posts: 324

Pie


View Profile Email
« Reply #5 on: November 01, 2006, 06:04:19 PM »
Very nice job and GL with future scripting
Timus
Custom GFX'erer
Global Moderator
Advanced Eclipser
*
Offline Offline

Posts: 1,287



View Profile Email
« Reply #6 on: November 06, 2006, 12:03:05 AM »
Yeah nice, this will be very helpful.
Franky
BASIC <3
Active Member
***
Offline Offline

Posts: 415


View Profile WWW Email
« Reply #7 on: March 27, 2007, 07:32:19 AM »
yes, that is a very helpful script. I was tired of the old color. Good job! =)
Pages: [1]
  Print  
« previous next »
 
 
Powered by EzPortal
Powered by MySQL Powered by PHP Powered by SMF 2.0 Beta 4 | SMF © 2006–2008, Simple Machines LLC | Sitemap Valid XHTML 1.0! Valid CSS!
Page created in 0.353 seconds with 32 queries.