//skull eyes script
//by RedTomahawk77
var quoteraw = "\""
var quote = string.Sub(quoteraw, 1)
func GetChar(x,y)
return draw.GetSymbol(x,y)
?loc.begin
var glyph1
var glyph2
var glyphx=46
var glyphy=5
var glyphxx
var glyphyy
var skulleyes=1
var skull=0
var skullround=1
?loc=undead_crypt_intro
?GetChar(10,26)="/"&GetChar(12,26)="\"
?GetChar(36,8)="H"|
^GetChar(36,11)="H"|
^GetChar(36,14)="H"
skulleyes=0
?GetChar(41,3)="="
skull=1
?GetChar(47,6)="="
skull=2
?GetChar(53,9)="="
skull=3
?skullround=1
glyph1=GetChar(glyphx,glyphy)
?glyph1="/" & skulleyes=1
?GetChar(glyphx,glyphy+1)="\"
>`@glyphx+1@,@glyphy+1@,#ddaa00, o o
:
>`@glyphx+1@,@glyphy+1@,#ffbb00,o o
?GetChar(glyphx,glyphy-1)="/"
glyphy--
?GetChar(glyphx,glyphy+1)="/"
glyphy++
?GetChar(glyphx-1,glyphy)="/"
glyphx--
?GetChar(glyphx+1,glyphy)="/"
glyphx++
?GetChar(glyphx-2,glyphy)="/"
glyphx=glyphx-2
?GetChar(glyphx+2,glyphy)="/"
glyphx=glyphx+2
?GetChar(glyphx-1,glyphy-1)="/"
glyphx--
glyphy--
?GetChar(glyphx+1,glyphy+1)="/"
glyphx++
glyphy++
?GetChar(glyphx+1,glyphy-1)="/"
glyphx++
glyphy--
?GetChar(glyphx-1,glyphy+1)="/"
glyphx--
glyphy++
?GetChar(35,8)="L"|
^GetChar(35,11)="L"|
^GetChar(35,14)="L"
skulleyes=1
skullround=0
?skull=1
glyphxx=42
glyphyy=4
?skull=2
glyphxx=48
glyphyy=7
?skull=3
glyphxx=54
glyphyy=10
?skullround=0
glyph2=GetChar(glyphxx,glyphyy)
?glyph2=quote
?GetChar(glyphxx,glyphyy)=quote
?GetChar(33,4)=")"
>`@glyphxx-1@,@glyphyy-1@,#ccbb00,o
>`@glyphxx+1@,@glyphyy-1@,#cc8800,o
:
>`@glyphxx-1@,@glyphyy-1@,#cc8800,o
>`@glyphxx+1@,@glyphyy-1@,#ccbb00,o
?GetChar(glyphxx,glyphyy-1)=quote
glyphyy--
?GetChar(glyphxx,glyphyy+1)=quote
glyphyy++
?GetChar(glyphxx-1,glyphyy)=quote
glyphxx--
?GetChar(glyphxx+1,glyphyy)=quote
glyphxx++
?GetChar(glyphxx-2,glyphyy)=quote
glyphxx=glyphxx-2
?GetChar(glyphxx+2,glyphyy)=quote
glyphxx=glyphxx+2
?GetChar(glyphxx,glyphyy-2)=quote
glyphyy=glyphyy-2
?GetChar(glyphxx,glyphyy+2)=quote
glyphyy=glyphyy+2
?GetChar(glyphxx-1,glyphyy-1)=quote
glyphxx--
glyphyy--
?GetChar(glyphxx+1,glyphyy+1)=quote
glyphxx++
glyphyy++
?GetChar(glyphxx+1,glyphyy-1)=quote
glyphxx++
glyphyy--
?GetChar(glyphxx-1,glyphyy+1)=quote
glyphxx--
glyphyy++