Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- @name Space Invaders
- @inputs S:wirelink User:entity
- @outputs Xpos ShootX ShootY Shoot
- @persist Items Shootwait Xpos ShootX ShootY Shoot Timer
- @trigger all
- setName("Space Invaders [Alpha]")
- interval(50)
- S:egpDrawTopLeft(1)
- findIncludeClass("player")
- findInSphere(entity():pos(),50)
- if(first()){
- ShootY = 512
- timer("Targs",1000)
- Timer = 15
- }
- if(clk("Targs")){
- Timer = Timer-1
- if(Timer == 0){
- for(I=1,8){
- S:egpBox(I+7,vec2(50*I,50),vec2(20,20))
- }
- Timer = 15
- }
- timer("Targs",1000)
- }
- S:egpText(50,"Time Left: "+Timer+"s",vec2(400,10))
- NearEnt = find()
- CSR=S:egpCursor(NearEnt)
- Xpos = CSR:x()
- S:egpBox(1,vec2(Xpos-28,440),vec2(55,20))
- S:egpBox(2,vec2(Xpos-13,430),vec2(25,25))
- if(Xpos <= 0){
- S:egpRemove(1)
- S:egpRemove(2)
- }
- if(NearEnt:keyUse() & Shoot == 0){
- ShootX = Xpos
- ShootY = 450
- Shoot = 1
- Shootwait = curtime()+0.2
- }
- if(Shoot == 1){
- ShootY = ShootY-18
- S:egpColor(3,vec(200,100,0))
- S:egpBox(3,vec2(ShootX-5,ShootY),vec2(10,30))
- }
- if(ShootY < 10){S:egpRemove(3) Shoot = 0}
- ######### Heart ##############
- S:egpDrawTopLeft(0)
- S:egpRoundedBox(5,vec2(40,470),vec2(25,40))
- S:egpColor(5,vec(200,0,0))
- S:egpAngle(5,45)
- S:egpRoundedBox(6,vec2(60,470),vec2(25,40))
- S:egpColor(6,vec(200,0,0))
- S:egpAngle(6,-45)
- S:egpBox(7,vec2(50,486),vec2(16,16))
- S:egpColor(7,vec(200,0,0))
- S:egpAngle(7,45)
- S:egpDrawTopLeft(1)
- for(Index=8,16){
- Vec = vec2(ShootX,ShootY)
- if(inrange(Vec,S:egpPos(Index),S:egpPos(Index)+S:egpSize(Index)))
- {S:egpRemove(Index)}
- }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement