unreal.xml

用delphi写的delphi源代码 用delphi写的delphi源代码 用delphi写的delphi源代码 用delphi写的delphi源代码

<?xml version="1.0" encoding="windows-1251"?>
<SynUniHighlighter Version="2.0">
	<SyntaxColoring>
		<Info>
			<General Name="Unreal Script" Extensions="" Version="1" Revision="0" Sample="//----Comment-----------------------------------------------------------
class TestObject expands Object;

#exec MESH    IMPORT     MESH=Something ANIVFILE=MODELS\Something.3D DATAFILE=MODELS\Something.3D X=0 Y=0 Z=0 MLOD=0

var() Sound HitSound;

state SomeState {
function Cast()
        {
          Super.Cast();
          CastTime = 50;
          GatherEffect = Spawn( class'SomethingCorona',,, GetStartLoc(), Pawn(Owner).ViewRotation );
          GatherEffect.SetFollowPawn( Pawn(Owner) );
        }
}

class ex_state3 extends Actor;

function PostBeginPlay() {
  BroadcastMessage(&quot;PostBeginPlay called&quot;);
  SetTimer(3.0,True);
}

// Weapon fire that goes through wall
var() float Thick;

function TraceFire( float Accuracy ) {
    local vector HitLocation, HitNormal, StartTrace, EndTrace, X,Y,Z;
    local actor Other;
    local Pawn PawnOwner;
    local float Penetration;
    PawnOwner = Pawn(Owner);
    Owner.MakeNoise(PawnOwner.SoundDampening);
    GetAxes(PawnOwner.ViewRotation,X,Y,Z);
}

defaultproperties {
    Thick=20.0
    PawnThick=36.0
}
" History=""/>
			<Author Name="Vitaly Nevzorov" Mail="[e-mail]" Web="www.delphist.com" Copyright="Copyright (c) Vitaly Nevzorov, 2002" Company="N/A" Remark="Translated from SynHighlighterUnreal.pas"/>
		</Info>
		<Schemes/>
		<Editor/>
		<MainRules Name="Root" Style="Root">
			<Attributes Foreground="clNone" Background="clWhite"/>
			<Delimiters Value="!&quot;#$%&amp;'()*+,-./:;&lt;=&gt;?@[\]^`{|}~"/>
			<SubRules>
				<Range Name="Resolution" Style="Resolution">
					<Attributes Foreground="$000080FF" Background="clWhite"/>
					<Delimiters Value="!&quot;#$%&amp;'()*+,-./:;&lt;=&gt;?@[\]^`{|}~"/>
					<OpenToken StartLine=""/>
					<CloseToken StartLine=""/>
					<Properties CloseOnTerm="True"/>
					<MultiTokens>
						<Tokens Open="::"/>
					</MultiTokens>
					<SubRules/>
				</Range>
				<Range Name="Strings" Style="Strings">
					<Attributes Foreground="clRed" Background="clWhite"/>
					<Delimiters Value="!&quot;#$%&amp;'()*+,-./:;&lt;=&gt;?@[\]^`{|}~"/>
					<OpenToken StartLine=""/>
					<CloseToken StartLine=""/>
					<Properties/>
					<MultiTokens>
						<Tokens Open="'" Close="'"/>
					</MultiTokens>
					<SubRules/>
				</Range>
				<Range Name="Strings" Style="Strings">
					<Attributes Foreground="clRed" Background="clWhite"/>
					<Delimiters Value="!&quot;#$%&amp;'()*+,-./:;&lt;=&gt;?@[\]^`{|}~"/>
					<OpenToken StartLine=""/>
					<CloseToken StartLine=""/>
					<Properties/>
					<MultiTokens>
						<Tokens Open="&quot;" Close="&quot;"/>
					</MultiTokens>
					<SubRules/>
				</Range>
				<Range Name="Remark" Style="Remark">
					<Attributes Foreground="$00A00000" Background="clWhite"/>
					<Delimiters Value="!&quot;#$%&amp;'()*+,-./:;&lt;=&gt;?@[\]^`{|}~"/>
					<OpenToken StartLine=""/>
					<CloseToken StartLine=""/>
					<Properties CloseOnEol="True"/>
					<MultiTokens>
						<Tokens Open="//"/>
					</MultiTokens>
					<SubRules/>
				</Range>
				<KeyList Name="Key words" Enabled="True" Style="" Words="IF
EACH
DO
CASE
NAME
CATCH
BREAK
EXEC
DOT
FOR
SCALE
ELSE
VAR
GUID
FINAL
SELF
NEW
INT
LOCAL
FALSE
BOOL
MESH
LONG
NONE
PLANE
GLOBAL
MODEL
COERCE
VOID
DELETE
BYTE
ENUM
CLASS
CONFIG
FLOAT
SKIP
OUT
FOREACH
THIS
AUTO
GOTO
WHILE
COLOR
TRUE
RELIABLE
STATE
EVENT
DEFAULT
CONST
NATIVE
LATENT
STATIC
SOUND
CROSS
MUTABLE
COORDS
SUPER
SWITCH
EXPANDS
VECTOR
ABSTRACT
LOCALIZED
STRING
EXTENDS
PRIVATE
RETURN
EXPLICIT
UNRELIABLE
HIDEPARENT
CONTINUE
REGISTER
STRUCT
SINGULAR
FUNCTION
OPTIONAL
GLOBALCONFIG
SIMULATED
ITERATOR
PROTECTED
ROTATOR
OPERATOR
EDITCONST
TEXTURE
INTRINSIC
TRANSIENT
REPLICATION
NOEXPORT
BOUNDINGBOX
PREOPERATOR
SCRIPTCONST
BOUNDINGVOLUME
POSTOPERATOR
NATIVEREPLICATION
DEFAULTPROPERTIES
">
					<Attributes Foreground="clGreen" Background="clWhite"/>
				</KeyList>
			</SubRules>
		</MainRules>
	</SyntaxColoring>
	<CodeFolding/>
	<CustomData/>
</SynUniHighlighter>