Code:
@name hacky's os XANA
@inputs S:wirelink Keyboard On Restart
@outputs P_light Door Light Led1 Led2 Led3
@persist String:string Already_on OS LINE Col ENTER
@trigger all
if (first()) {S:writeCell(2041,1)
Array=String:explode(" ")
}
if(Keyboard==13){ENTER=1}else{ENTER=0}
if(Keyboard==127){Back=1}else{Back=0}
#if(Back==1){String=String-String:explode(""):string(String:length())}
S:writeString("Projekt XANA",0,0,999,0,0)
S:writeString("_____________________",0,1,999,0,0)
if(On==1){
Led1=1
Light=1
P_light=1
if(first()) {
LINE=2
S:writeCell(2041,1)
String=""
}
if(Keyboard & ~Keyboard & Back==0 & Back==0) {
String += toChar(Keyboard)
}
S:writeString(">>"+String+" ",0,LINE,999,0,0)
}
if(Back==1){String = String:left(String:length()-1)}
if(On==0){
Led1=0
Light=0
P_light=0
S:writeCell(2041,1)
String=""
LINE=2
}
if(Restart) {String=""
S:writeCell(2041,1)
LINE=2}
if(ENTER){soundPlay(2,0,"Friends/message.wav")
if(String=="shutdown"){
LINE+=1
S:writeString("Unable to shutdown.",0,LINE,900,0,0)
LINE+=1
String=""
}
elseif(String=="opendoor") {Door=138
,0,LINE+=1,String=""}
elseif(String=="closedoor") {Door=0
,0,LINE+=1,String=""}
elseif(String=="so1")
{soundPlay(2,0,"music/hl2_song1.mp3")
,0,LINE+=1,String=""}
elseif(String=="so2")
{soundPlay(2,0,"music/hl2_song2.mp3")
,0,LINE+=1,String=""}
elseif(String=="so3")
{soundPlay(2,0,"music/hl2_song3.mp3")
,0,LINE+=1,String=""}
elseif(String=="so4")
{soundPlay(2,0,"music/hl2_song4.mp3")
,0,LINE+=1,String=""}
elseif(String=="so5")
{soundPlay(2,0,"music/hl2_song16.mp3")
,0,LINE+=1,String=""}
elseif(String=="so6")
{soundPlay(2,0,"music/hl2_song17.mp3")
,0,LINE+=1,String=""}
elseif(String=="so7")
{soundPlay(2,0,"ravebreak.mp3")
,0,LINE+=1,String=""}
elseif(String=="hazard")
{soundPlay(2,0,"music/HL1_song11.mp3")
,0,LINE+=1,String=""}
elseif(String=="kool")
{soundPlay(2,0,"music/HL1_song25_remix3.mp3")
,0,LINE+=1,String=""}
elseif(String=="hl1-2")
{soundPlay(2,0,"music/hl1_song15")
,0,LINE+=1,String=""}
elseif(String=="hl-s")
{soundPlay(2,0,"music/hl2_song23_suitsong3")
,0,LINE+=1,String=""}
elseif(String=="creepy")
{soundPlay(2,0,"music/radio1.mp3")
,0,LINE+=1,String=""}
elseif(String=="so8")
{soundPlay(2,0,"bennyhill_v2.mp3")
,0,LINE+=1,String=""}
elseif(String=="so9")
{soundPlay(2,0,"aprilondynasty/hamster.wav")
,0,LINE+=1,String=""}
elseif(String=="vo1")
{soundPlay(2,0,"vo/gman_misc/gman_riseshine.wav")
,0,LINE+=1,String=""}
elseif(String=="vo2")
{soundPlay(2,0,"vo/gman_misc/gman_02.wav")
,0,LINE+=1,String=""}
elseif(String=="vo3")
{soundPlay(2,0,"vo/gman_misc/gman_03.wav")
,0,LINE+=1,String=""}
elseif(String=="vo4")
{soundPlay(2,0,"vo/gman_misc/gman_04.wav")
,0,LINE+=1,String=""}
elseif(String=="vo5")
{soundPlay(2,0,"vo/heavy_no03.wav")
,0,LINE+=1,String=""}
elseif(String=="text")
{concmd("say hello world")
,0,LINE,String=""}
elseif(String=="cmd ")
{concmd("Array:string(2)")
,0,LINE,String=""}
elseif(String:explode(" "):string(1):lower()=="play")
{soundPlay(1,999,String:explode(" "):string(2):lower()),LINE+=1,String=""}
elseif(String=="restart"){
String=""
S:writeCell(2041,1)
LINE=2
}
elseif(String=="help"){
LINE+=1
S:writeString("shutdown > SHUTDOWN OS",0,LINE,999,0,0),LINE+=1
S:writeString("restart > os restart",0,LINE,999,0,0),LINE+=1
S:writeString("cheats/off>turns cheats on and off",0,LINE,999,0,0),LINE+=1
S:writeString("opendoor/closedoor>what it says",0,LINE,999,0,0),LINE+=1
S:writeString("sl> opens songlist",0,LINE,999,0,0), LINE+=1
String=""
}
elseif(String=="sl"){
LINE+=1
S:writeString("hazard>valve opening",0,LINE,999,0,0),LINE+=1
S:writeString("so2> hl2 song 2",0,LINE,999,0,0),LINE+=1
S:writeString("so3> hl2 song 3",0,LINE,999,0,0),LINE+=1
S:writeString("so4> hl2 song 4",0,LINE,999,0,0),LINE+=1
S:writeString("so5> hl2 song 16",0,LINE,999,0,0), LINE+=1
S:writeString("so6> hl2 song 17",0,LINE,999,0,0), LINE+=1
S:writeString("so7> ravebreak",0,LINE,999,0,0), LINE+=1
S:writeString("so8> Bennyhill",0,LINE,999,0,0), LINE+=1
S:writeString("so9> hampster dance",0,LINE,999,0,0), LINE+=1
S:writeString("kool> lol song",0,LINE,999,0,0), LINE+=1
String=""
}
elseif(String=="vm"){
LINE+=1
S:writeString("vo1>hl2 gman speech 1",0,LINE,999,0,0),LINE+=1
S:writeString("vo2> hl2 song 2",0,LINE,999,0,0),LINE+=1
S:writeString("vo3> hl2 song 3",0,LINE,999,0,0),LINE+=1
S:writeString("vo4> hl2 song 4",0,LINE,999,0,0),LINE+=1
String=""
}
else{
Led3=1,0,1,0,1,0,1
LINE+=1
S:writeString("thats not a command!",0,LINE,200,90,905),LINE+=1
String=""
}
}
if(~Keyboard) {Led2=1,soundPlay(1,5,"ambient/machines/keyboard"+randint(1,2)+"_clicks.wav")} sorry its so long and it has 228 lines it just plays audio and opens a door or somthin hydrolic it has a restart comand and button im going to code more to be a base master comp
Bookmarks