[Info] Type:AdvDupe File Creator:"λpeχ Predator" Date:04/23/12 Description:"none" Entities:1 Constraints:0 [More Information] FileVersion:0.84 AdvDupeVersion:1.85 AdvDupeToolVersion:1.9 AdvDupeSharedVersion:1.72 SerialiserVersion:1.4 WireVersion:2501 Time:08:19 PM Head:69 HoldAngle:0,8.65998,0 HoldPos:-0.948425,-0.476807,-0.250015 StartPos:-1013.49,-2913.97,64 [Save] Entities:19D4DFE8{S:"MeS";Y:7;Y:8;S:"ZP";Y:9;S:"Max";Y:10;}H1D627348{N:69=T:1AF0F408;}1AF0F528{N:0=T:197896F8;}19D4E018{Y:11;Y:11;Y:12;Y:12;Y:12;Y:12;Y:12;}19D4DE98{T:19D4DEC8;T:19D4DEF8;}1AF0F4C8{Y:21=T:1AF0F4F8;}19D4DEC8{;}1D94D4E8{Y:24=S:"";S:"PLA"=P:1678806044;Y:25=T:1D94D518;S:"ZP"=N:0;Y:9=N:0;Y:10=N:0;S:"Me"=P:1678806044;S:"MeS"=S:"";Y:26=N:0;Y:27=N:1;Y:7=S:"";S:"Max"=N:0;Y:28=N:0;S:"Col"=N:0;Y:29=N:-1.#IND;Y:30=N:0;Y:31=N:1.#INF;Y:8=N:0;}1D94D518{;}197896F8{Y:1=A:1.00179e-005,0,360;Y:2=V:0.948425,0.476807,0.250015;Y:3=B:t;}1AF0F468{Y:22=T:1AF0F4C8;}19D4DEF8{;}1AF0F4F8{;}1AF0F408{Y:4=T:1AF0F528;Y:6=Y:5;Y:1=A:360,0,0;Y:13=T:19D4DFB8;Y:14=T:19D4DE98;Y:16=Y:15;Y:2=V:0.948425,0.476807,0.250015;Y:18=Y:17;Y:20=Y:19;Y:23=T:1AF0F468;Y:32=T:1D94D4E8;Y:33=N:0;}19D4DFB8{T:19D4DFE8;T:19D4E018;} Constraints:H1A38B440{;} [Dict] 1:"LocalAngle" 2:"LocalPos" 3:"Frozen" 4:"PhysicsObjects" 5:"gmod_wire_expression2" 6:"Class" 7:"AttackS" 8:"LeadSound" 9:"Mode" 10:"Counter" 11:"STRING" 12:"NORMAL" 13:"_outputs" 14:"_inputs" 15:"Props Madness - By Moglizorz" 16:"_name" 17:"models/beer/wiremod/gate_e2.mdl" 18:"Model" 19:"@name Props Madness - By Moglizorz€@outputs Mode Counter Max ZP LeadSound [MeS AttackS]:string€@persist Col Hide List:array [Me Attack PLA]:entity€runOnTick(1)€runOnChat(1)€if(first()){Me=owner(), Hide=1}€if(chatClk(owner())|chatClk(Me)){#Run chat command part of program€ LastSaidL=lastSaid():lower() #Convert to lowercase€ if(chatClk(Me)){ #Controller commands€ if (LastSaidL==£!col£) {Col=!Col, CommandRan=1} € if (LastSaidL==£!stop£) {Mode=0, Attack=noentity(), AttackS=££, CommandRan=1}€ if (LastSaidL:sub(1,8)==£!attack £) {AttackS=lastSaid():sub(9,LastSaidL:length()), Mode=2, CommandRan=1} € }€ if(chatClk(owner())){ #Owner commands€ if (LastSaidL==£!hide£) {Hide=!Hide, CommandRan=1}€ if (LastSaidL==£!remove£) {selfDestruct(), hint(£Chip removed£,5), CommandRan=1}€ if (LastSaidL:sub(1,8)==£!player £) {MeS=LastSaidL:sub(9,LastSaidL:length()), Mode=0, Attack=noentity(), AttackS=££, CommandRan=1}€ if (LastSaidL==£!owner£) {Me=owner(), MeS=££, Mode=0, Attack=noentity(), AttackS=££, CommandRan=1} € }€ if((CommandRan)&(Hide)&(Me==owner())) {print(£[Hidden]£+Me:name()+£: £+lastSaid()), hideChat(1)}€}#Finish chat commands€if((MeS!=££)&(Me:name():lower():find(MeS:lower())==0)){Me=findPlayerByName(MeS)}#Search for controller entity€if((AttackS!=££)&(Attack:name():lower():find(AttackS:lower())==0)){Attack=findPlayerByName(AttackS)}#Search for target entity€if((Me:keyUse())&(Me:aimEntity():isPlayer())){Attack=Me:aimEntity(), Mode=2}€if(tickClk()){#So main program doesn't overload from people typing€ findIncludePlayerProps(owner())€# findByClass(£gmod_balloon£)€# findByClass(£gmod_wire_nailer£)€ findByClass(£prop_physics£) €# findByClass(£npc_rollermine£)€# findByClass(£npc_turret_floor£)€ if(Max!=findToArray():count()){€ List=findToArray()€ Max=List:count()€ }€ if(Me:isCrouch()&(Me:inNoclip()|Me:isOnGround())){Mode=1, AttackS=££, Attack=noentity()}€ elseif(!Me:isCrouch()&(Mode!=2)){Mode=0}€ if(Mode==0){€ if(LeadSound){soundStop(1),LeadSound=0}€ while(opcounter()Max){Counter=0}€ }€ else{€ EELead=List:entity(1)€ if(!LeadSound){EELead:soundPlay(1,0,£npc/zombie/moan_loop£+randint(1,4)+£.wav£),LeadSound=1}€ if(Attack==noentity()){€ ZP=(EELead:massCenter():setZ(0)):distance(Me:aimPos():setZ(0))/2€ if(ZP>720){ZP=720} € EELead:applyForce(((Me:aimPos()+vec(0,0,0+ZP)-EELead:massCenter())*10-EELead:vel())*EELead:mass())€ }else{€ ZP=(EELead:massCenter():setZ(0)):distance(Attack:pos():setZ(0))€ if(ZP>1440){ZP=1440} € EELead:applyForce(((Attack:pos()+vec(0,0,0+ZP)-EELead:massCenter())*10-EELead:vel())*EELead:mass()) € }€ if(Col){if(random(10)<1){EELead:setColor(randint(255),randint(255),randint(255))},EELead:setMaterial(£hunter/myplastic£)}else{EELead:setColor(255,255,255),EELead:setMaterial(££)}€ while(opcounter()Max){Counter=1}€ }€}#end of chatclk statement€if(PLA!=owner()) { € Version=1.95€ PLA=owner()€ Me=owner(), MeS=££, Mode=0, Attack=noentity(), AttackS=££€ if(convar(£wire_expression2_concmd£)){€ hint(£---- Balls of Steel v£+toString(Version)+£ ----£,7)€ hint(£Instructions printed to console(~).£,7)€ concmd(£echo ### ---- Balls of Steel v£+toString(Version)+£ ----£)€ concmd(£echo ### Commands:£)€ concmd(£echo ### \\!attack PLAYER - Puts it in snake mode, and flys to the player.£)€ concmd(£echo ### \\!col - Toggles the flashing colors, and matt/orignal material.£)€ concmd(£echo ### \\!hide - Toggles hiding written commands on/off (on by default).£)€ concmd(£echo ### \\ - Puts it into snake mode, and follows your mouse.£)€ concmd(£echo ### \\ - The snake locks on to whoever you are aiming at.£)€ concmd(£echo ### \\!player PLAYER - Gives possesion of the snake to another player, they have access to all of the above commands.£)€ concmd(£echo ### \\!owner - Returns possesion to the owner, does nothing if it's already the owners.£)€ concmd(£echo ### \\!remove - Destroys the Expression2, and the balls drop (LOL RUDE).£)€ concmd(£echo ### \\---- By Moglizorz ----£)€ }else{€ hint(£---- Balls of Steel v£+toString(Version)+£ ----£,7)€ hint(£Please type \\£wire_expression2_concmd 1\\£ into console,£,7)€ hint(£then respawn the chip for a list of commands.£,7)€ }€}€" 20:"_original" 21:"Wires" 22:"WireDupeInfo" 23:"EntityMods" 24:"LastSaidL" 25:"List" 26:"CommandRan" 27:"Hide" 28:"Version" 29:"CircZPlus" 30:"CircMult" 31:"AddCircle" 32:"_vars" 33:"Skin" Saved:11