SHARE
TWEET

Untitled

a guest Mar 9th, 2017 341 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. @name Auto Gunstore V2
  2. @inputs EGP:wirelink User:entity Ranger:entity
  3. @outputs U
  4. @persist Profit U
  5. @trigger
  6.  
  7.   if(first()){
  8. Profit = 0
  9. U = 0
  10. }  
  11.  
  12.  function number wirelink:egpButton(Idx:number,Ply:entity){
  13.         TL = This:egpPos(Idx) - This:egpSize(Idx) / 2 * (0 ? 0 : 1)
  14.         BR = This:egpPos(Idx) + This:egpSize(Idx) / (0 ? 1 : 2)
  15.         Cur = This:egpCursor(Ply) return inrange(Cur, TL, BR) exit()}  
  16.        
  17.        
  18.         EGP:egpText(4,"",vec2(256,18)) EGP:egpAlign(4,1,1) EGP:egpSize(4,40)
  19.         EGP:egpText(5,"",vec2(256,58)) EGP:egpAlign(5,1,1) EGP:egpSize(5,40)  
  20.  
  21. if(Ranger:isShipment()){
  22.     EGP:egpBox(10,vec2(256,256),vec2(470,470)) EGP:egpColor(10,255,255,255,100)
  23.     EGP:egpText(27,""+Ranger:shipmentName(),vec2(256,200)) EGP:egpAlign(27,1,1) EGP:egpSize(27,60) EGP:egpColor(27,0,0,0,150)
  24.     EGP:egpText(28,""+Ranger:shipmentName(),vec2(256,198)) EGP:egpAlign(28,1,1) EGP:egpSize(28,60)
  25.  
  26.  EGP:egpText(29,"Price: "+(Ranger:shipmentPrice()+Profit),vec2(256,310)) EGP:egpAlign(29,1,1) EGP:egpSize(29,80) EGP:egpColor(29,0,0,0,150)
  27.     EGP:egpText(30,"Price: "+(Ranger:shipmentPrice()+Profit),vec2(256,308)) EGP:egpAlign(30,1,1) EGP:egpSize(30,80)
  28.    
  29.     EGP:egpText(31,"",vec2(256,300)) EGP:egpAlign(31,1,1) EGP:egpSize(31,60) EGP:egpColor(31,0,0,0,150)
  30.     EGP:egpText(32,"",vec2(256,298)) EGP:egpAlign(32,1,1) EGP:egpSize(32,60)
  31. }else{
  32.  EGP:egpBox(10,vec2(256,256),vec2(470,470)) EGP:egpColor(10,255,255,255,100)
  33. EGP:egpText(27,"add statment please",vec2(256,200)) EGP:egpAlign(27,1,1) EGP:egpSize(27,60) EGP:egpColor(27,0,0,0,150)
  34.         EGP:egpText(28,"add statment please",vec2(256,198)) EGP:egpAlign(28,1,1) EGP:egpSize(28,60)
  35.    
  36.   EGP:egpText(29,"a new",vec2(256,250)) EGP:egpAlign(29,1,1) EGP:egpSize(29,60) EGP:egpColor(29,0,0,0,150)
  37.     EGP:egpText(30,"a new",vec2(256,248)) EGP:egpAlign(30,1,1) EGP:egpSize(30,60)
  38.    
  39.     EGP:egpText(31,"shipment",vec2(256,300)) EGP:egpAlign(31,1,1) EGP:egpSize(31,60) EGP:egpColor(31,0,0,0,150)
  40.     EGP:egpText(32,"shipment",vec2(256,298)) EGP:egpAlign(32,1,1) EGP:egpSize(32,60)
  41. }
  42.    
  43.     if(~User & User){
  44.     if(EGP:egpButton(1,User) & Ranger:isShipment()){
  45.             Menu = 1
  46.             moneyRequest(User,Ranger:shipmentPrice()+Profit,"purchase of"+Ranger:shipmentName())
  47.     }
  48. }
  49.  
  50. if(moneyClk()){
  51.    
  52.    U= 1 concmd("say /pm "+moneyClkPlayer():steamID()+" you have bought "+Ranger:shipmentName()+" for "+(Ranger:shipmentPrice()+Profit)+" Dollars")
  53.    timer("ResetUser",2000)
  54. }
  55.  
  56. if(clk("ResetUser")){
  57.     U = 0
  58. }
  59.  
  60. runOnChat(1)
  61.  
  62. P = owner():lastSaid():explode(" ")
  63. if(P[1,string]=="!profit" & chatClk(owner())){
  64.    Profit = P[2,string]:toNumber()
  65.    
  66. }
RAW Paste Data
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy. OK, I Understand
 
Top