;Artificial Intelligence Script

;Header

desc          = alarm!!!

;Triggers

:state=0,plrwithinzone=1:loopsound=*Путь к вашему звуку тревоги*,state=1
:state=1:timerstart,ambiencered=255,ambiencegreen=0,ambienceblue=0,state=2
:state=2,timergreater=30:state=3,ambiencered=2  55,ambiencegreen=51,ambienceblue=51
:state=3,timergreater=60:state=4,ambiencered=255,ambiencegreen=102,ambienceblue=102
:state=4,timergrea  ter=90:state=5,ambiencered=255,ambiencegreen=153,ambienceblue=153
:state=5,timergreater=120:state=6,ambiencered=255,ambiencegreen=204,ambie  nceblue=204
:state=6,timergreater=150:state=7,ambiencered=255,ambiencegreen=255,ambienceblue=255
:state=7,timergreater=180:state=8,ambienc  ered=255,ambiencegreen=204,ambienceblue=204
:state=8,timergreater=210:state=9,ambiencered=255,ambiencegreen=153,ambienceblue=153
:state=9,  timergreater=240:state=10,ambiencered=255,ambiencegreen=102,ambienceblue=102
:state=10,timergreater=270:state=1,ambiencered=255,ambiencegre  en=51,ambienceblue=51

;End of Script

;Artificial Intelligence Script

by TheStoryteller01 2010

;Header

This script only works with FPSC 1.16.18, because FPGCRAWTEXT is used AND it also needs a mod that supports the PICKOBJECT condition.

desc=

Made for doors that are locked at the start and can be opened with an item named "small key".
To start the script at any time, the player has to move the cursor over the door and press <Enter>.
While the script is running the player cannot move or use mouselook but still shoot.Pressing <Del> at any time ends the script.

The script checks the following conditions:
- player has/hasn't got the right key
- door is locked/unlocked
- door is open/closed
If he has the right key, the player can choose to unlock the door or leave it.
Once the door is open it stays open but the player can close it again. He cannot lock the door again though.

;Triggers

:state=0:state=1

:state=1,pickobject=1,plrdistwithin=60,plrusingaction=1:timerstart,plrdisable=100000,state=2,

:state=2:fp  gcrawtextsize=24,fpgcrawtextfont=verdana,fpgcrawtextr=150,fpgcrawtextg=150,fpgcrawtextb=150,fpgcrawtextx=50,fpgcrawtexty=60
:state=2:fpgcra  wtext=A sturdy wooden door. It is locked.
:state=2,timergreater=500,plrusingaction=1:timerstart,state=4
:state=2,scancodekeypressed=14:plrdisable=0,state=0

:state=4,plrh  askey=1:timerstart,plrsound=audiobank\thestoryteller01\keypickup.wav,state=6
:state=4,plrhaskey=0:timerstart,plrsound=audiobank\thestorytel  ler01\wooddoorrattle.wav,state=7
:state=4,scancodekeypressed=14:plrdisable=0,state=0

:state=6:fpgcrawtextsize=24,fpgcrawtextfont=verdana  ,fpgcrawtextr=150,fpgcrawtextg=150,fpgcrawtextb=150,fpgcrawtextx=50,fpgcrawtexty=60
:state=6:fpgcrawtext=Maybe the small key will unlock the door.
:state=6,timergreater=500,plrusingaction=1:timerstart,plrsound=audiobank\ww2\scenery\doors\lock.wav,state=9
:state=6,scancodekeypres  sed=14:plrdisable=0,state=0

:state=7:fpgcrawtextsize=24,fpgcrawtextfont=verdana,fpgcrawtextr=150,fpgcrawtextg=150,fpgcrawtextb=150,fpgcra  wtextx=50,fpgcrawtexty=60
:state=7:fpgcrawtext=I don't have the right key.
:state=7,timergreater=500,plrusingaction=1:state=0
:state=7,timergreater=1500:plrdisable=0,state=0
:state=7,scancodekeypressed=14:pl  rdisable=0,state=0

:state=9:fpgcrawtextsize=24,fpgcrawtextfont=verdana,fpgcrawtextr=150,fpgcrawtextg=150,fpgcrawtextb=150,fpgcrawtextx=50  ,fpgcrawtexty=60
:state=9:fpgcrawtext=I unlocked the door.
:state=9,timergreater=500,plrusingaction=1:timerstart,state=12
:state=9,scancodekeypressed=14:plrdisable=0,state=10

:state=10,pic  kobject=1,plrdistwithin=60,plrusingaction=1:timerstart,plrdisable=100000,state=11

:state=11:fpgcrawtextsize=24,fpgcrawtextfont=verdana,fp  gcrawtextr=150,fpgcrawtextg=150,fpgcrawtextb=150,fpgcrawtextx=50,fpgcrawtexty=60
:state=11:fpgcrawtext=A sturdy wooden door. I already unlocked it.
:state=11,timergreater=500,plrusingaction=1:timerstart,state=12
:state=11,scancodekeypressed=14:plrdisable=0,state=10

:state=12:fpg  crawtextsize=24,fpgcrawtextfont=verdana,fpgcrawtextr=150,fpgcrawtextg=150,fpgcrawtextb=150,fpgcrawtextx=50,fpgcrawtexty=60
:state=12:fpgcra  wtext=Press <Enter> to open or <Del> to leave it.
:state=12,timergreater=500,plrusingaction=1:plrdisable=0,state=14
:state=12,scancodekeypressed=14:plrdisable=0,state=10

:state=14:s  etframe=0,plrsound=audiobank\ww2\scenery\doors\open.wav,state=15
:state=15:incframe=0
:state=15,frameatend=0:coloff,state=16

:state=16,  pickobject=1,plrdistwithin=80,plrusingaction=1:timerstart,plrdisable=100000,state=17

:state=17:fpgcrawtextsize=24,fpgcrawtextfont=verdana  ,fpgcrawtextr=150,fpgcrawtextg=150,fpgcrawtextb=150,fpgcrawtextx=50,fpgcrawtexty=60
:state=17:fpgcrawtext=I left the door open.
:state=17,timergreater=500,plrusingaction=1:timerstart,state=18
:state=17,timergreater=1000:plrdisable=0,state=16
:state=17,scancod  ekeypressed=14:plrdisable=0,state=16

:state=18:fpgcrawtextsize=24,fpgcrawtextfont=verdana,fpgcrawtextr=150,fpgcrawtextg=150,fpgcrawtextb=  150,fpgcrawtextx=50,fpgcrawtexty=60
:state=18:fpgcrawtext=Press <Enter> to close or <Del> to leave it.
:state=18,timergreater=500,plrusingaction=1:plrdisable=0,state=19
:state=18,scancodekeypressed=14:plrdisable=0,state=16

:state=19:c  olon,state=20
:state=20:decframe=0,
:state=20,frameatstart=0:setframe=0,plrsound=audiobank\ww2\scenery\doors\close.wav,state=10

;End of Script