Page 1 of 2 12 LastLast
Results 1 to 10 of 13
Like Tree2Likes

Thread: [E2] HeliChair, Man Eating Fridge and Buddy Creeper!

  1. #1
    Wirererer failcake's Avatar
    Join Date
    Jul 2009
    Location
    In Aperture Science Laboratories
    Posts
    393

    Wink [E2] HeliChair, Man Eating Fridge and Buddy Creeper!

    My latest 3 Expression 2s .

    First, the HeliChair!



    Questions :

    Q:What is this?
    A:Its a half chair, half heli. It can fly and shoot missiles .

    Q:How can i wire it?
    A:Simple! Just wire everything to a pod!

    Q:I used it on a chair, but the angles are rong!HELP!
    A:I dint have time to fix that, due to exams..., but i will soon make a adv.dup that solves all your problems. Meanwhile just try to find the angle of the map.

    Q:What chair model it needs to be?
    A:The exact chair model should be the airboat model. If you use others, it will look ugly.

    Video :



    Code :

    Code:
    @name FailCake HeliChair
    @inputs Active Seat:wirelink Driv:entity
    @outputs Eject
    @persist Ops [Chair E]:entity P Rot Out Speed Driver:entity Df:entity Angfg Speedy Onc MaxSpeed Fire Aim:vector Ang Up Forward:vector Backward:vector 
    @persist AllowFly Musics:array Vector:vector OwnerOnly FirstAng:angle In Rdy Follow Vect2:vector Vect3:vector Timeout2 Float:vector Timeout [Rocket1 Rocket2]:entity
    @persist Dos InSpeed
    @trigger all
    runOnTick(1)
    
    W = Seat:number("W")
    S = Seat:number("S")
    A = Seat:number("A")
    D = Seat:number("D")
    
    Driver = Driv:driver()
    #Made By FailCake
    Ops = ops()
    Shoot = Seat:number("Mouse1")
    StartIt = Seat:number("R")
    Active = Seat:number("Active")
    Shift = Seat:number("Mouse2")
    Attack = Seat:number("Space")
    Beep = Seat:number("Shift")
    
    Music = Seat:number("Alt")
    
    #### SETTING ####
    
    OwnerOnly = 0
    
    #### SETTING ####
    
    
    
    if(first() | duped()){
    E = entity()
    #propSpawnEffect(0)
    
    Chair = E:isWeldedTo()
    Chair:soundPlay(100,100,"ambient/machines/machine1_hit2.wav")
    Chair:setMass(100)
    Eject = 0
    if(Chair:type() != "prop_vehicle_prisoner_pod"){
    hint("* [Error] Please Place the E2 at a Chair. *",7)
    selfDestructAll()    
    }else{
    hint("* Chair Validated! *",7)
    }
    
    Musics[0,string] = "music/hl2_song20_submix0.mp3"
    Musics[1,string] = "music/hl2_song20_submix4.mp3"
    Musics[2,string] = "music/hl2_song29.mp3"
    Musics[3,string] = "music/hl2_song31.mp3"
    Musics[4,string] = "music/hl2_song6.mp3"
    Musics[5,string] = "music/hl2_song30.mp3"
    
    FirstAng = Chair:angles()
    
    MaxSpeed = 40
    hint("Made By FailCake",7)
    holoCreate(1)
    holoModel(1,"models/props_docks/dock01_pole01a_128.mdl")
    holoParent(1,E)
    holoPos(1,E:toWorld(vec(-20,1.3,5.8)))
    holoAng(1,ang(0,90,0))
    holoScaleUnits(1,vec(3,3,40))
     
    holoCreate(2)
    holoModel(2,"models/props_c17/TrapPropeller_Blade.mdl")
    holoParent(2,E)
    holoPos(2,E:toWorld(vec(-33.8,1.3,4.5)))
    holoAng(2,ang(0,90,0))
    holoScaleUnits(2,vec(100,130,10)) 
    
    holoCreate(3)
    holoModel(3,"models/props_c17/TrapPropeller_Blade.mdl")
    holoParent(3,E)
    holoPos(3,E:toWorld(vec(-33.8,1.3,4.5)))
    holoAng(3,ang(0,-90,0))
    holoScaleUnits(3,vec(100,130,10)) 
    
    holoCreate(9)
    holoModel(9,"models/props_c17/TrapPropeller_Blade.mdl")
    holoParent(9,E)
    holoPos(9,E:toWorld(vec(-33.8,1.3,4.5)))
    holoAng(9,ang(0,0,0))
    holoScaleUnits(9,vec(100,130,10)) 
    
    holoCreate(10)
    holoModel(10,"models/props_c17/TrapPropeller_Blade.mdl")
    holoParent(10,E)
    holoPos(10,E:toWorld(vec(-33.8,1.3,4.5)))
    holoAng(10,ang(0,180,0))
    holoScaleUnits(10,vec(100,130,10)) 
    
    holoCreate(4)
    holoModel(4,"models/props_c17/TrapPropeller_Engine.mdl")
    holoParent(4,E)
    holoScaleUnits(4,vec(16,16,18))
    holoPos(4,E:toWorld(vec(0,0,4.2)))
    holoAng(4,ang(0,-90,0))
    
    holoCreate(5)
    holoModel(5,"models/weapons/W_missile_launch.mdl")
    holoParent(5,E)
    holoPos(5,E:toWorld(vec(10,15,-13)))
    holoAng(5,ang(0,-90,0))
    
    holoCreate(6)
    holoModel(6,"models/weapons/W_missile_launch.mdl")
    holoParent(6,E)
    holoPos(6,E:toWorld(vec(10,-15,-13)))
    holoAng(6,ang(0,-90,0))
    
    holoCreate(7)
    holoModel(7,"models/props_docks/dock01_pole01a_128.mdl")
    holoParent(7,E)
    holoPos(7,E:toWorld(vec(10,-12,-13)))
    holoScaleUnits(7,vec(1,1,8))
    holoAng(7,ang(0,90,90))
    
    holoCreate(8)
    holoModel(8,"models/props_docks/dock01_pole01a_128.mdl")
    holoParent(8,E)
    holoPos(8,E:toWorld(vec(10,12,-13)))
    holoScaleUnits(8,vec(0.8,0.8,5.5))
    holoAng(8,ang(0,90,90))
    
    holoCreate(11)
    holoModel(11,"models/props_vehicles/carparts_muffler01a.mdl")
    holoParent(11,E)
    holoPos(11,E:toWorld(vec(7.5,6,7)))
    holoScaleUnits(11,vec(15,5,4))
    holoAng(11,ang(0,90,90))
    
    holoCreate(12)
    holoModel(12,"models/props_junk/TrafficCone001a.mdl")
    holoParent(12,E)
    holoPos(12,E:toWorld(vec(-40.5,1,3.5)))
    holoScaleUnits(12,vec(7,7,10))
    holoAng(12,ang(0,0,0))
    
    holoCreate(13)
    holoModel(13,"models/props_junk/sawblade001a.mdl")
    holoParent(13,E)
    holoPos(13,E:toWorld(vec(-35.7,1,4)))
    holoScaleUnits(13,vec(20,20,1))
    holoAng(13,ang(0,0,0))
    
    holoCreate(15)
    holoModel(15,"models/props_junk/sawblade001a.mdl")
    holoParent(15,E)
    holoPos(15,E:toWorld(vec(-34.9,1,4)))
    holoScaleUnits(15,vec(20,20,1))
    holoAng(15,ang(0,0,0))
    
    holoCreate(14)
    holoColor(14,vec(0,255,0))
    holoModel(14,"hqicosphere")
    holoScaleUnits(14,vec(5,5,5))
    
    holoCreate(16)
    holoModel(16,"models/props_c17/pulleywheels_small01.mdl")
    holoParent(16,E)
    holoPos(16,E:toWorld(vec(-33,1.3,4.9)))
    holoScaleUnits(16,vec(6,8,8))
    holoAng(16,ang(90,0,0))
    
    Timeout = 0
    Speed = 0.1
    StartIt = 0
    Timeout2 = 0
    Rdy = 0
    
    E:soundPlay(1,0,"npc/combine_gunship/dropship_engine_near_loop1.wav")
    E:soundPlay(2,0,"npc/combine_gunship/engine_rotor_loop1.wav")  
    E:soundPlay(3,0,"npc/combine_gunship/engine_whine_loop1.wav") 
    
    
    }
    
    
    if(StartIt & Timeout2 == 0){
    Timeout2 = 1  
    Angfg = 1 
    if(Rdy == 1){
    Rdy = 0  
    }else{
    Rdy = 1    
    }
     
    }
    
    if(Timeout2){
    timer("hold",700)
    if(clk("hold")){
    Timeout2 = 0   
    }    
    }
    
    if(Active & Rdy == 1){ 
    if(Out){
    timer("bss",500)
    if(clk("bss")){
    Out = 0
    stoptimer("bss")    
    }    
    }
      
    if(Music & Out == 0){
    Out = 1  
    
    if(P <= Musics:count()){
    P+=1
    }else{
    P = 0
    }
    
    Chair:soundPlay(200,0,Musics[P,string])
    E:soundPlay(201,0,Musics[P,string])  
     
    soundVolume(200,Speed*3)
    soundVolume(201,Speed*3)
    }    
        
    #Made By FailCake 
    holoPos(14,Driver:aimPos())
    holoAlpha(14,255) 
       
    soundPitch(1,Speed*3)
    soundPitch(2,Speed*3)
    soundPitch(3,Speed*3)
    
    if(Speed == 2){
    holoEntity(11):setTrails(10,10,1,"trails/smoke",vec(5,5,5),255)    
    }
    
    if(Speed <= MaxSpeed){   
    Speed+=0.05
    AllowFly = 0
    }else{
    AllowFly = 1
    }
    
    Angfg = 1
    
    holoAng(3,holoEntity(3):toWorld(ang(0,Speed,0)))
    holoAng(2,holoEntity(2):toWorld(ang(0,Speed,0)))    
    holoAng(9,holoEntity(9):toWorld(ang(0,Speed,0)))
    holoAng(10,holoEntity(10):toWorld(ang(0,Speed,0)))
    holoAng(12,holoEntity(12):toWorld(ang(0,Speed,0)))
    holoAng(13,holoEntity(13):toWorld(ang(0,Speed,0)))
    holoAng(15,holoEntity(15):toWorld(ang(0,Speed,0)))
    holoAng(1,holoEntity(1):toWorld(ang(0,Speed,0)))
    holoAng(16,holoEntity(16):toWorld(ang(0,0,-Speed)))
    ## Firing
    
    if(Shoot){
        
    if(Timeout == 0){
    Timeout = 1 
    E:soundPlay(10,0,"weapons/rpg/rocketfire1.wav")
    
    Rocket1 = propSpawn("models/props_phx/misc/potato_launcher_explosive.mdl",holoEntity(5):pos(),holoEntity(5):angles(),0)    
    Rocket1:setAlpha(0)
    Rocket1:setTrails(10,10,10,"trails/smoke",vec(255,255,255),255)
    
    Rocket2 = propSpawn("models/props_phx/misc/potato_launcher_explosive.mdl",holoEntity(6):pos(),holoEntity(6):angles(),0)    
    Rocket2:setAlpha(0)
    Rocket2:setTrails(10,10,10,"trails/smoke",vec(255,255,255),255)
    Aim = Driver:aimPos()
    
    Rocket1:propNotSolid(1)
    Rocket2:propNotSolid(1)  
    
    holoAlpha(5,0)
    holoAlpha(6,0)
    Follow = 0
    Fire = 1
    }
    
    }
    #Made By FailCake
    if(Fire){
    holoColor(14,vec(255,0,0))
    timer("unsa",300)
    if(clk("unsa")){
    Rocket1:propNotSolid(0)
    Rocket2:propNotSolid(0)    
    }    
        
    timer("wait",3000)
    if(clk("wait")){
    Rocket1:propBreak()
    Rocket2:propBreak()   
    Fire = 0
    Timeout = 0 
    E:soundPlay(23,0,"items/ammo_pickup.wav")
    holoColor(14,vec(0,255,0))
    holoAlpha(5,255)
    holoAlpha(6,255)
    }    
    }
    
    
    if(Fire){
    timer("swich",200)
    
    if(clk("swich")){
    stoptimer("swich") 
    Follow = 1   
    }
    
    if(Follow){
    Vect2 = (Aim - Rocket1:pos())* 1000
    Vect3 = (Aim - Rocket2:pos())* 1000
    
    Rocket1:applyForce(Vect2 + $Vect2*5)
    Rocket2:applyForce(Vect3 + $Vect3*5)
    }else{
    Rocket1:applyForce(Rocket1:forward()*1000)
    Rocket2:applyForce(Rocket1:forward()*1000)
    }
    
    }
    
    if(AllowFly){
    Dos = 0
    
    if(A){
    Ang += 1   
    }
    
    if(D){
    Ang -= 1    
    }
    
    if(W == 0 & S == 0){
    Up = 0
    }
    
    if(W){
    Up = -10
    E:applyForce(Forward*Speedy + $Forward*Speedy) 
    }
    
    if(Shift){
    Speedy = 500
    InSpeed = 3    
    }else{
    InSpeed = 1.5
    Speedy = 50
    }
    
    #Made By FailCake
    if(S){
    Up = 5 
    E:applyForce(Backward*50 + $Backward*50)   
    }
    
    if(Attack){
    In+=InSpeed  
    }
    if(Beep){
    In-=InSpeed    
    }
    
    #Made By FailCake   
    Forward=(Chair:pos()+Chair:forward()*2 - Chair:pos())
    Backward=(Chair:pos()+Chair:forward()*-2 - Chair:pos())
    
    Float = (vec(Chair:pos():x(),Chair:pos():y(),In)-Chair:pos())*100
    
    E:applyForce(-Chair:vel()/2)
    E:applyForce(Float+$Float*5)
    
    
    TarQ = quat(FirstAng + ang(0,Ang,Up))
    CurQ = quat(Chair)
    Q = TarQ/CurQ
    V = Chair:toLocal(rotationVector(Q)+Chair:pos())
    Chair:applyTorque((200*V - 12*Chair:angVelVector())*Chair:inertia()) 
    }
    }else{
    
    rangerFilter(E)
    rangerFilter(Chair)
    Rang = rangerOffset(2,Chair:pos(),-Chair:up())
    
    if(Rang:hit()){
    Dos = 1    
    }
    
    if(Dos == 1 | Speed < 0){
    In = Chair:pos():z() 
    Angfg = 0   
    }
    
    if(Angfg){
    Float = (vec(Chair:pos():x(),Chair:pos():y(),In)-Chair:pos())*80
    
    E:applyForce(-Chair:vel()/2)
    E:applyForce(Float+$Float*5)
    
    TarQ = quat(FirstAng + ang(0,Ang,Up))
    CurQ = quat(Chair)
    Q = TarQ/CurQ
    V = Chair:toLocal(rotationVector(Q)+Chair:pos())
    Chair:applyTorque((200*V - 12*Chair:angVelVector())*Chair:inertia())     
    }
    
    
    holoAlpha(14,0) 
    
    if(Speed > 0){
    Speed-=0.05    
    }
    
    In = Chair:pos():z()
    holoEntity(11):removeTrails()
    
    soundPitch(1,Speed*3)
    soundPitch(2,Speed*3)
    soundPitch(3,Speed*3)
    
    Rocket1:propBreak()
    Rocket2:propBreak()   
    Fire = 0
    Timeout = 0 
    
    holoAlpha(5,255)
    holoAlpha(6,255)
    
    #Made By FailCake
    Rdy = 0
    
    holoAng(3,holoEntity(3):toWorld(ang(0,Speed,0)))
    holoAng(2,holoEntity(2):toWorld(ang(0,Speed,0)))      
    holoAng(9,holoEntity(9):toWorld(ang(0,Speed,0)))
    holoAng(10,holoEntity(10):toWorld(ang(0,Speed,0)))
    holoAng(12,holoEntity(12):toWorld(ang(0,Speed,0)))
    holoAng(13,holoEntity(13):toWorld(ang(0,Speed,0)))
    holoAng(15,holoEntity(15):toWorld(ang(0,Speed,0)))
    holoAng(1,holoEntity(1):toWorld(ang(0,Speed,0)))
    holoAng(16,holoEntity(16):toWorld(ang(0,0,-Speed)))
    }
    #Made By FailCake   
    
    if(duped()){
    selfDestructAll()    
    }
    
    if(owner() == noentity()){
    selfDestructAll()      
    }
    
    if(Active){
    if(OwnerOnly == 1){
    Df = Driv:driver()    
    if(Df == owner()){
    Eject = 0    
    }else{
    Eject = 1  
    }
        
    }
    }else{
    Eject = 0
    }
    
    ## Made by FailCake!
    Man Eating Fridge!

    Questions :

    Q:What is this?
    A:Its a fridge that "eats" anyone who comes near it.

    Q:How can i kill it?
    A:Just "drag" it to the water. It dies if it touches it .



    Code :

    Code:
    @name FailCake Man Eating Fridge
    @outputs E:entity Eat Cos Debug Onc Attack:entity Kill Die Lol Died Ang:angle [Float]:vector In
    @persist T T2 Ply:array I Ranger:ranger
    @trigger all
    @model models/props_interiors/refrigerator01a.mdl
    
    runOnTick(1)
    
    if(first() | duped()){
    E = entity()
    Eat = 0
    Debug = 0
    Onc = 0
    E:setMass(1000)
    Attack = noentity()
    
    holoCreate(1)
    holoModel(1,"cube")
    holoScaleUnits(1,vec(2,2,2))
    holoParent(1,E)
    holoAlpha(1,0)
    holoPos(1,E:toWorld(vec(16,-15.5,28.5)))
    
    holoCreate(3)
    holoModel(3,"cube")
    holoScaleUnits(3,vec(2,2,2))
    holoParent(3,E)
    holoAlpha(3,0)
    holoPos(3,E:toWorld(vec(16,-15.5,-5.5)))
    
    holoCreate(2)
    holoModel(2,"models/props_interiors/refrigeratorDoor02a.mdl")
    holoParent(2,1)
    holoPos(2,E:toWorld(vec(16,0,29)))
    
    holoCreate(4)
    holoModel(4,"models/props_interiors/refrigeratorDoor01a.mdl")
    holoParent(4,3)
    holoPos(4,E:toWorld(vec(16,0,-7)))
    
    ## FOOD ##
    # Made by Failcake
    hint("Made by FailCake",7)
    holoCreate(5)
    holoModel(5,"models/Gibs/HGIBS.mdl")
    holoParent(5,E)
    holoAng(5,ang(0,-40,0))
    holoPos(5,E:toWorld(vec(-3,5,23.5)))
    
    holoCreate(6)
    holoModel(6,"models/props_junk/PopCan01a.mdl")
    holoParent(6,E)
    holoAng(6,ang(0,-40,0))
    holoPos(6,E:toWorld(vec(-3,-3,24)))
    
    holoCreate(7)
    holoModel(7,"models/props_junk/PopCan01a.mdl")
    holoParent(7,E)
    holoSkin(7,2)
    holoAng(7,ang(90,-40,0))
    holoPos(7,E:toWorld(vec(2,-9,22.5)))
    
    holoCreate(8)
    holoModel(8,"models/props_junk/garbage_plasticbottle002a.mdl")
    holoParent(8,E)
    holoAng(8,ang(-90,90,0))
    holoPos(8,E:toWorld(vec(6,5,22.5)))
    
    holoCreate(9)
    holoModel(9,"models/props_junk/watermelon01.mdl")
    holoParent(9,E)
    holoScale(9,vec(0.7,0.7,0.7))
    holoAng(9,ang(0,0,0))
    holoPos(9,E:toWorld(vec(-3,5,12.5)))
    
    holoCreate(10)
    holoModel(10,"models/props_junk/watermelon01_chunk01b.mdl")
    holoParent(10,E)
    holoScale(10,vec(0.7,0.7,0.7))
    holoAng(10,ang(0,90,0))
    holoPos(10,E:toWorld(vec(5,-7,10)))
    
    holoCreate(11)
    holoModel(11,"models/props_junk/garbage_takeoutcarton001a.mdl")
    holoParent(11,E)
    holoAng(11,ang(0,30,0))
    holoPos(11,E:toWorld(vec(-5,-8,13.5)))
    
    setName("FailCake Normal Fridge")
    
    holoCreate(12)
    holoModel(12,"models/props_junk/garbage_milkcarton001a.mdl")
    holoParent(12,E)
    holoAng(12,ang(90,90,0))
    holoPos(12,E:toWorld(vec(-5,4,0)))
    
    holoCreate(13)
    holoModel(13,"models/props_junk/garbage_milkcarton002a.mdl")
    holoParent(13,E)
    holoScale(13,vec(0.7,0.7,0.7))
    holoAng(13,ang(0,50,0))
    holoPos(13,E:toWorld(vec(2,-8,0)))
    
    holoCreate(14)
    holoModel(14,"models/props_junk/MetalBucket02a.mdl")
    holoParent(14,E)
    holoScale(14,vec(0.5,0.5,0.5))
    holoAng(14,ang(0,10,0))
    holoPos(14,E:toWorld(vec(0,0,-15)))
    
    holoCreate(15)
    holoModel(15,"models/props_junk/Shoe001a.mdl")
    holoParent(15,E)
    holoAng(15,ang(0,20,0))
    holoPos(15,E:toWorld(vec(0,5,-29)))
    
    holoCreate(16)
    holoModel(16,"models/props_junk/Shoe001a.mdl")
    holoParent(16,E)
    holoAng(16,ang(0,-20,0))
    holoPos(16,E:toWorld(vec(0,-5,-29)))
    
    holoCreate(17)
    holoModel(17,"models/props_junk/garbage_coffeemug001a.mdl")
    holoParent(17,E)
    holoAng(17,ang(0,-20,0))
    holoPos(17,E:toWorld(vec(5,3,-2.5)))
    
    holoCreate(18)
    holoModel(18,"models/props_interiors/Radiator01a.mdl")
    holoParent(18,E)
    holoAng(18,ang(-180,0,90))
    holoPos(18,E:toWorld(vec(-19,0,0)))
    
    holoCreate(19)
    holoModel(19,"models/props_lab/powerbox02d.mdl")
    holoParent(19,E)
    holoAng(19,ang(0,90,0))
    holoPos(19,E:toWorld(vec(-11.5,20,-30)))
    
    if(Debug){
    holoAlpha(2,40)  
    holoAlpha(4,40) 
    }else{
    holoAlpha(2,255)  
    holoAlpha(4,255) 
    }
    
    }
    
    if(Eat){ 
        
    T+=1
    T2+=0.5
    Cos = cos(T*5)*90
    Cos2 = cos(T2*15)*90
    
    if(Onc == 0){
    Onc = 1  
    E:soundPlay(2,0,"npc/fast_zombie/fz_scream1.wav")   
    E:soundPlay(1,0,"npc/fast_zombie/gurgle_loop1.wav")
    setName("FailCake Man Eating Fridge")   
    In = E:pos():z()  
    }
    
    if(Cos < 3){
    holoAng(1,E:toWorld(ang(0,Cos,0)))
    }
    
    if(Cos2 < 3){
    holoAng(3,E:toWorld(ang(0,Cos2,0))) 
    }
    
    Kill = 1
      
    }else{
    Cos = 0
    Cos2 = 0
    holoAng(1,E:toWorld(ang(0,Cos,0)))
    holoAng(3,E:toWorld(ang(0,Cos2,0)))
    soundStop(1)
    Onc = 0
    }
    
    if(Attack == noentity()){
    #findExcludePlayer(owner())
    findByClass("player")
    Ply = findToArray()
    
    for(I=1,Ply:count()){
        
    if(Ply[I,entity]:pos():distance(E:pos()) <= 100){
    Eat = 1   
    Attack = Ply[I,entity]
    }
        
    }
    }
    
    if(Died & Die == 0){
    if(Attack:health() > 0){
    Died = 0
    Kill = 0
    Lol = 0
    Attack = noentity()  
    soundStop(2)  
    soundStop(1)
    soundStop(5)
    soundStop(3)
    }    
    }
    
    Ranger = rangerOffset(200,E:pos(),-E:up() + vec(0,0,-30))
    
    if(Kill & Die == 0){
    Float = ((Ranger:position()+vec(0,0,50))-E:pos())*1500
    
    Ang = (E:pos() - Attack:pos()):toAngle() + ang(0,-180,0)  
    Ang = Ang:setPitch(0)
    TarQ = quat(Ang)
    CurQ = quat(E)
    Q = TarQ/CurQ
    V = E:toLocal(rotationVector(Q)+E:pos())
    
    if(Died == 0 & Die == 0){
        
    E:applyForce(Float+$Float*5)
    E:applyForce(-E:vel()*14)
    E:applyForce(E:forward()*6500)
    E:applyTorque((200*V - 12*E:angVelVector())*E:inertia()) 
    E:propFreeze(0) 
    }
    
    if(Attack:health() <= 0 & Die == 0){
    Died = 1 
    Eat = 0
    setName("FailCake Normal Fridge")
    if(Lol == 0){
    Lol = 1
    E:soundPlay(5,0,"vo/SandwichEat09.wav")
    soundStop(2)  
    soundStop(1)
    soundStop(3)   
    }
    E:propFreeze(1) 
    }
    
    }
    
    if(E:isUnderWater()){
    Die = 1    
    }
    
    if(Die){
    E:setColor(90,90,90,255)
    
    if(changed(Die)){  
    E:soundPlay(4,0,"npc/headcrab/die1.wav") 
    }
     
    holoColor(2,vec(90,90,90))
    holoColor(4,vec(90,90,90))
    soundStop(2)
    Eat = 0
    Die = 1
    soundStop(1)
    
    timer("delete",5000)
    if(clk("delete")){
    selfDestructAll()    
    }
    
    }
    
    if(duped() | owner() == noentity()){
    selfDestructAll()    
    }
    And Finaly the Buddy Creeper!

    Questions :

    Q:What is this?
    A:Its a "creeper" based on minecraft.

    Q:Why its called "buddy" creeper?
    A:The inicial project was it to follow you around, but again, no time .



    Code :

    Code:
    @name FailCake CreeperBuddy
    @outputs Move T T1 [Pos]:vector Ang:angle Rand Randang Onc Count Bum Ply:array Explode
    @persist Ranger:ranger Scale
    @trigger all
    
    runOnTick(1)
    E = entity()
    
    if(first()){
    E:setAlpha(0)  
     
    Move = 1
    
    holoCreate(1)
    holoModel(1,"cube")
    holoScaleUnits(1,vec(2,2,5))
    holoPos(1,E:toWorld(vec(0,0,3)))
    
    ## Mover
    
    holoCreate(4)
    holoModel(4,"cube")
    holoScaleUnits(4,vec(1,1,1))
    holoPos(4,E:toWorld(vec(0,-0.8,0.2)))
    holoParent(4,1)
    holoAlpha(4,0)
    
    holoCreate(8)
    holoModel(8,"cube")
    holoScaleUnits(8,vec(1,1,1))
    holoPos(8,E:toWorld(vec(0,-0.8,0.2)))
    holoAlpha(8,0)
    holoParent(8,1)
    
    holoCreate(5)
    holoModel(5,"cube")
    holoScaleUnits(5,vec(1,1,1))
    holoPos(5,E:toWorld(vec(0,0.8,0.2)))
    holoAlpha(5,0)
    holoParent(5,1)
    
    holoCreate(0)
    holoModel(0,"cube")
    holoScaleUnits(0,vec(1,1,1))
    holoPos(0,E:toWorld(vec(0,0.8,0.2)))
    holoAlpha(0,0)
    holoParent(0,1)
    
    ## Mover
    
    holoCreate(2)
    holoModel(2,"cube")
    holoScaleUnits(2,vec(1.4,1.4,1.5))
    holoPos(2,E:toWorld(vec(1,0.8,0.2)))
    holoParent(2,5)
    
    holoCreate(3)
    holoModel(3,"cube")
    holoScaleUnits(3,vec(1.4,1.4,1.5))
    holoPos(3,E:toWorld(vec(-1,-0.8,0.2)))
    holoParent(3,8)
    
    holoCreate(6)
    holoModel(6,"cube")
    holoScaleUnits(6,vec(1.4,1.4,1.5))
    holoPos(6,E:toWorld(vec(-1,0.8,0.2)))
    holoParent(6,0)
    
    holoCreate(7)
    holoModel(7,"cube")
    holoScaleUnits(7,vec(1.4,1.4,1.5))
    holoPos(7,E:toWorld(vec(1,-0.8,0.2)))
    holoParent(7,4)
    
    
    ## Head
    
    holoCreate(9)
    holoModel(9,"cube")
    holoScaleUnits(9,vec(2.3,2.3,2.3))
    holoPos(9,E:toWorld(vec(0,0,5.7)))
    holoParent(9,1)
    #eye
    
    holoCreate(10)
    holoModel(10,"cube")
    holoScaleUnits(10,vec(0.5,0.4,0.6))
    holoColor(10,vec(1,1,1))
    holoPos(10,E:toWorld(vec(-0.5,-1.05,6.5)))
    holoParent(10,9)
    
    holoCreate(11)
    holoModel(11,"cube")
    holoScaleUnits(11,vec(0.5,0.4,0.6))
    holoColor(11,vec(1,1,1))
    holoPos(11,E:toWorld(vec(0.5,-1.05,6.5)))
    holoParent(11,9)
    
    holoCreate(12)
    holoModel(12,"cube")
    holoScaleUnits(12,vec(0.76,0.4,0.75))
    holoColor(12,vec(1,1,1))
    holoPos(12,E:toWorld(vec(0,-1.05,5.7)))
    holoParent(12,9)
    
    holoCreate(13)
    holoModel(13,"cube")
    holoScaleUnits(13,vec(0.4,0.4,0.8))
    holoColor(13,vec(1,1,1))
    holoPos(13,E:toWorld(vec(0.5,-1.05,5.5)))
    holoParent(13,9)
    hint("Made by FailCake",7)
    holoCreate(14)
    holoModel(14,"cube")
    holoScaleUnits(14,vec(0.4,0.4,0.8))
    holoColor(14,vec(1,1,1))
    holoPos(14,E:toWorld(vec(-0.47,-1.05,5.5)))
    holoParent(14,9)
    
    for(I=0,9){
    holoColor(I,vec(114,255,0))    
    }
    
    }
    
    rangerFilter(E)
    Ranger = rangerOffset(1000,holoEntity(1):pos(),-holoEntity(1):up())
    
    if(Ranger:hit()){
    Pos = Ranger:position() + vec(0,0,3.5)
    holoPos(1,Pos)
    }
    
    
    ## Random Angles()
    
    timer("chosse", 700)
    timer("ANG",1500)
    
    if(clk("ANG")){
    Randang = randint(-180,180)   
    }
    
    if(T <= Randang){
    T++    
    }else{
    T--
    }
    
    holoAng(9,ang(0,T,0))
    
    if(clk("chosse")){
    Rand = randint(1,100)
    }
    
    if(Rand >= 20 & Rand <= 60){
    Move = 1 
    holoPos(1,holoEntity(1):pos() + holoEntity(9):right())   
    }else{
    Move = 0
    }
    
    
    if(Move){
    T+=1
    T1-=1
    
    Cos = cos(T*6)*15
    Cos1 = cos(T1*6)*15
    
    holoAng(4,ang(0,0,Cos))
    holoAng(5,ang(0,0,-Cos))  
    holoAng(0,ang(0,0,Cos1)) 
    holoAng(8,ang(0,0,-Cos1))  
    }else{
    holoAng(4,ang(0,0,0))
    holoAng(5,ang(0,0,0))
    holoAng(0,ang(0,0,0))
    holoAng(8,ang(0,0,0))
    }
    
    findByClass("player")
    Ply = findToArray()
    
    for(I = 1,Ply:count()){
        
    if(Ply[I,entity]:pos():distance(holoEntity(1):pos()) <= 40){
    Explode = 1    
    }   
    
    }
    
    
    if(Explode){
        
    if(Scale <= 1){
    Scale+=0.05 
    holoScaleUnits(1,vec(Scale+2,Scale+2,Scale+5))  
    holoScaleUnits(9,vec(Scale+2.3,Scale+2.3,Scale+2.3  )) 
    }else{
    Bum = 1
    }
    
    if(Bum){
    
    if(Onc == 0){
    Onc = 1  
    holoCreate(15)
    holoModel(15,"hqcylinder")
    holoScaleUnits(15,vec(20,20,0.5))
    holoPos(15,holoEntity(1):toWorld(vec(0,0,-3.5))) 
    holoMaterial(15,"models/props_debris/concretefloor020a")
    holoEntity(15):soundPlay(100,100,"ambient/explosions/explode_1.wav")
    for(P=0,14){
    holoDelete(P)    
    } 
    
    
    }
    
    
    }
    
    }
    And a Extra E2
    The Melon Duel! :

    Questions :

    Q:What is this?
    A:Its a minigame based on css shot4shot.

    Q:How can i play it?
    A:Simple, just place the e2 and say "-duel <playername>" , once he accepts and hes ready just say "-start" to start the game. To fire use the physgun and mouse2.

    Video :



    Code :

    Code:
    @name FailCake DuelMelon v1
    @outputs Ply:entity Duel Said Acc Begin Timer Ready AllOk Once2 WIN
    @outputs Players:array Hold Melon:entity R WPl OS Reset
    @persist [Chat Chat2]:array
    @trigger all
    runOnTick(1)
    runOnChat(1)
    
    
    O = owner()
    E = entity()
    
    if(first()){
    Hold = 0
    propSpawnEffect(0)
    E:setMaterial("models/wireframe")
    
    holoCreate(1)
    holoModel(1,"hq_stube_thin")
    holoMaterial(1,"models/debug/debugwhite")
    holoScaleUnits(1,vec(300,500,1))
    holoParent(1,E) 
    holoAlpha(1,0)  
    holoColor(1,vec(0,255,0))
    holoPos(1,E:toWorld(vec(500,0,0)))
    
    holoCreate(2)
    holoModel(2,"hq_stube_thin")
    holoMaterial(2,"models/debug/debugwhite")
    holoScaleUnits(2,vec(300,500,1))
    holoParent(2,E) 
    holoAlpha(2,0)  
    holoColor(2,vec(255,0,0))
    holoPos(2,E:toWorld(vec(-500,0,0)))
    
    holoCreate(3)
    holoModel(3,"cube")
    holoMaterial(3,"models/debug/debugwhite")
    holoScaleUnits(3,vec(4,4,4))  
    holoAlpha(3,0)
    holoPos(3,E:toWorld(vec(0,0,80)))
    
    ## Arena 1
    
    holoCreate(4)
    holoModel(4,"cube")
    holoMaterial(4,"models/debug/debugwhite")
    holoScaleUnits(4,vec(289,489,4.5))  
    holoMaterial(4,"models/wireframe")
    holoColor(4,vec(255,0,0))
    holoAlpha(4,0)
    holoPos(4,E:toWorld(vec(-500,0,0)))
    
    hint("Made by FailCake",7)
    
    ## Arena 2
    
    holoCreate(5)
    holoModel(5,"cube")
    holoMaterial(5,"models/debug/debugwhite")
    holoScaleUnits(5,vec(289,489,4.5))  
    holoMaterial(5,"models/wireframe")
    holoAlpha(5,0)
    holoColor(5,vec(0,255,0))
    holoPos(5,E:toWorld(vec(500,0,0)))
    }
    
    Chat = O:lastSaid():explode(" ")
    
    if(chatClk(O)){
     
    if(Chat[1,string] == "!duel" & Begin == 0 & Ready== 0){
     
    Ply=findPlayerByName(Chat[2,string])
    
    if(Ply:isPlayer() & Ply != O){
    Duel = 1
    holoParent(3,Ply) 
    holoPos(3,Ply:toWorld(vec(0,0,80)))  
    }else{
    hint("Invalid Player!",7)
    }
    
    }
    
    if(Chat[1,string] == "!start" & Begin == 1 & AllOk == 1){
        
    Ready = 1
    Begin = 0
        
    }
        
    }
    
    if(Duel){
        
    if(Said == 0){
        
    timer("wait",800)
    if(clk("wait")){
    Said = 1
    holoEntity(3):soundPlay(100,100,"ui/duel_challenge_with_restriction.wav")
    concmd("say " + Ply:name() + ". " + O:name() + " Has Challenged you to a Melon Duel!")
    } 
    
    }
    
    if(Said == 1){
     
       
    timer("wait2",800)
    if(clk("wait2")){
    Said = 2
    Acc = 1
    concmd("say Say !accept to Accept it!")
    } 
    
    } 
     
    if(Acc){
    
    Chat2 = Ply:lastSaid():explode(" ")
    
    if(chatClk(Ply)){
     
    if(Chat2[1,string] == "!accept"){
    Acc = 0
    Duel = 0
    Begin = 1 
    
    Players[1,entity] = owner()
    Players[2,entity] = Ply 
      
    holoEntity(3):soundPlay(100,100,"ui/duel_challenge_accepted_with_restriction.wav")    
    }
        
    }
    
    }
    
    }
    
    if(Begin){
    Timer+=1    
      
    if(Timer == 30){
    concmd("say " + Ply:name() + " stand on the Red Line and " + O:name() + " stand on the green line.")    
    E:soundPlay(200,2000,"ui/gamestartup8.mp3")
    holoAlpha(1,255)
    holoAlpha(2,255)
    holoAlpha(4,255)
    holoAlpha(5,255)
    }
    
    if(Timer == 80){
    concmd("say [Rules] To Play, each user fires once while the other trys to dodge it.")    
    }
     
    if(Timer == 150){
    concmd("say [Rules] You cannot Leave your Area. If you do you lose..")    
    }
    
    if(Timer == 210){
    concmd("say [Rules] To Shoot the Melon Use the Physgun and press MouseKey2.")    
    }
    
    if(Timer == 280){
    concmd("say [Information] Once you guys are ready, Onwer say !start")    
    AllOk = 1
    } 
    
    }
    
    
    if(Ready){    
    
    if(Once2 == 0){
    timer("Say",600)
    if(clk("Say")){
    Once2 = 1  
    R = randint(1,2)   
    concmd("say [Information] " + Players[R,entity]:name() + " is the First one to Shoot.") 
    E:soundPlay(32,23,"vo/announcer_am_roundstart01.wav")
    }
    }
    
    for(OS = 1,Players:count()){
    
    if(Players[OS,entity]:health() <= 0){
    WIN = 1  
    Players:remove(OS)
    
    if(OS == 1){
    WPl = 2
    }elseif(OS == 2){
    WPl = 1
    }
    
    }
        
    }
    
    if(Players[R,entity]:keyAttack2() & Players[R,entity]:weapon():type() == "weapon_physgun" & Hold == 0){
    Hold = 1  
    Melon:propDelete()
    Melon = propSpawn("models/props_junk/watermelon01.mdl",0)
    Melon:setPos(((Players[R,entity]:pos() + vec(0,0,40)+ Players[R,entity]:eye()*15)))
    Melon:setMass(100)
    Melon:applyForce((Players[R,entity]:eye())*14^5)
    Melon:setTrails(10,10,3,"trails/physbeam",vec(255,255,255),255)
    Melon:soundPlay(444,444,"ui/trade_changed.wav")
    }
    
    if(Hold){
    timer("timeout",1400)
    if(clk("timeout")){
    
    Hold = 0
    
    if(R == 1){
    R = 2  
    holoEntity(4):soundPlay(555,555,"buttons/blip1.wav") 
    }elseif(R == 2){
    R = 1
    O:soundPlay(555,555,"buttons/blip1.wav")
    }
        
    }    
    }
    
    }
    
    if(WIN){
    timer("SayWho",600)
    if(clk("SayWho")){
    concmd("say [MelonDuel]"+ Players[WPl,entity]:name() + " wins the Duel!")  
    E:soundPlay(100,100,"")
    Melon:propDelete() 
    Ready = 0
    WIN = 0
    E:soundPlay(100,100,"misc/happy_birthday.wav")
    
    Reset = 1
    }    
    }
    
    if(Reset){
        
    timer("wass",1300)
    if(clk("wass")){
    reset()     
    }
    
    }
    That is all.
    I hope you guys also like my new intro .
    Comment !
    Last edited by failcake; 06-12-2011 at 05:43 AM. Reason: Added questions :D
    Jack37 and MegaStarlok666 like this.

    Wanna be my Friend?

    Believe me the graphics are there, your mind just can't process them.

  2. #2
    Wire Noob WireAddict's Avatar
    Join Date
    Feb 2011
    Posts
    1

    Default Re: [E2] HeliChair, Man Eating Fridge and Buddy Creeper!

    Very nice work man, will be testing these out later today. Nice to see your continuing to work on those Packs. Been following your work for a while. xD

  3. #3
    Wirererer gen-3's Avatar
    Join Date
    Mar 2011
    Location
    CERN
    Posts
    340

    Default Re: [E2] HeliChair, Man Eating Fridge and Buddy Creeper!

    You get just for the song in the intro. Great job on the originality, I foresee an increase in the recent trend of miniature contraptions. The helo looks a little jerky in the air though, when you angle it while hovering, smooth it out a lil?
    My brain's last firmware update got corrupted. Now I can only see in base 7.

    Add me on Steam. and get new friends for a change

    And keep track of my somewhat relevant screenshots for fun things mostly but not entirely in gmod!

    The square root of 763,932,023 is 27639.32023

  4. #4
    Wirererer holy knife's Avatar
    Join Date
    Feb 2010
    Posts
    225

    Default Re: [E2] HeliChair, Man Eating Fridge and Buddy Creeper!

    All your things seem easy to make, but the creativity involved is amazing. I wish I had imagination.

  5. #5
    Wirererer failcake's Avatar
    Join Date
    Jul 2009
    Location
    In Aperture Science Laboratories
    Posts
    393

    Default Re: [E2] HeliChair, Man Eating Fridge and Buddy Creeper!

    Quote Originally Posted by gen-3 View Post
    You get just for the song in the intro. Great job on the originality, I foresee an increase in the recent trend of miniature contraptions. The helo looks a little jerky in the air though, when you angle it while hovering, smooth it out a lil?
    Thanks .
    Im not good with applyforce, but i try my best!
    Added the 2 missing videos and an extra e2 .

    Wanna be my Friend?

    Believe me the graphics are there, your mind just can't process them.

  6. #6
    Wirererer Mikhail's Avatar
    Join Date
    May 2009
    Posts
    121

    Default Re: [E2] HeliChair, Man Eating Fridge and Buddy Creeper!

    I liked the part when you utterly pwned everyone in melon duel.

  7. #7
    Wire Noob JuDelCo's Avatar
    Join Date
    May 2011
    Location
    Spain
    Posts
    9

    Default Re: [E2] HeliChair, Man Eating Fridge and Buddy Creeper!

    These contraptions are very good ! And that goes in the video I am testing the helicopter! It was fun to test all this with you xD

    Btw, lol me spawning the pig at the end of creeper video xDDDDD

    4 you !
    Last edited by JuDelCo; 06-11-2011 at 08:14 AM.

  8. #8
    Wirererer failcake's Avatar
    Join Date
    Jul 2009
    Location
    In Aperture Science Laboratories
    Posts
    393

    Default Re: [E2] HeliChair, Man Eating Fridge and Buddy Creeper!

    I added "questions" to help. And now im fixing the holo Angles on Heli.

    Wanna be my Friend?

    Believe me the graphics are there, your mind just can't process them.

  9. #9
    Wirererer Mikhail's Avatar
    Join Date
    May 2009
    Posts
    121

    Default Re: [E2] HeliChair, Man Eating Fridge and Buddy Creeper!

    You should make the fridge stop chasing someone when they get a certain distance away.

  10. #10
    Wirererer failcake's Avatar
    Join Date
    Jul 2009
    Location
    In Aperture Science Laboratories
    Posts
    393

    Default Re: [E2] HeliChair, Man Eating Fridge and Buddy Creeper!

    Quote Originally Posted by Mikhail View Post
    You should make the fridge stop chasing someone when they get a certain distance away.
    I also though of that, but then it was too easy..since the fridge is more slow than you =(.

    Wanna be my Friend?

    Believe me the graphics are there, your mind just can't process them.

Page 1 of 2 12 LastLast

Tags for this Thread

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •  
unnecessary
unnecessary
unnecessary
unnecessary
linguistic-parrots
linguistic-parrots
linguistic-parrots
linguistic-parrots