Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- @name OnlineWep
- @inputs [EGP]:wirelink [User]:entity
- @outputs
- @persist [Page,Company,Gname,CurrShopID]:string [CurrWep,Trans,Gscope,DelvPrice,Profit,Amount,Online]:number [CurUser]:entity [WepArray,WepPriceArray,Destination]:array
- @trigger
- if(first() | dupefinished()) {
- CurrWep = 0
- CurrShopID = "SWC"
- Company = ""
- Gname = "WebShop"
- Gscope = 0
- Profit = 500
- Amount = 1
- Online = 0
- dsJoinGroup(Gname)
- dsSetScope(Gscope)
- WepArray = array("AK47","AK74","Famas","G4A3","Deagle","Glock-20","G36C","M4A1","KS-23","M14","M82","M24","M21","Raging Bull","M1911","OTs-33","P228","PP-19 Bizon","MP5","SKS","RPK-47","M3 Shotgun","SR-25","SG552","SG550","UZI")
- WepPriceArray = array(3000,2900,2900,3200,750,550,3100,3100,2400,4000,7000,5600,6000,700,480,850,600,2100,2200,4800,3800,2600,5500,3000,3100,2100,5000)
- Destination = getDestinationIDs()
- #########################
- runOnChat(1)
- function void getCheapComp() {
- DelvPrice = 100000
- Id = 0
- foreach(K, Comp:string = getDeliveryCompanyIDs()) {
- Id++
- PriceDeliver = getDeliveryCompany(Comp)["Prices",table]["FromWeb",number] + getDeliveryCompany(Comp)["Prices",table]["ToHouse",number]
- PriceSend = getDeliveryCompany(Comp)["Prices",table]["FromPerson",number] + getDeliveryCompany(Comp)["Prices",table]["ToHouse",number]
- if((PriceDeliver + PriceSend) < DelvPrice) {
- DelvPrice = PriceDeliver + PriceSend
- Company = Comp
- CompanyName = getDeliveryCompany(Comp)["Name",string]
- }
- }
- if(Id == 0) {
- EGP:egpSetText(44,"Statens Pakkeservice") EGP:egpColor(44,vec4(255,255,255,255))
- EGP:egpSetText(42,"3500.-") EGP:egpColor(42,vec4(255, 127, 15,255))
- DelvPrice = 3500
- Company = ""
- }else{
- EGP:egpSetText(44,CompanyName) EGP:egpColor(44,vec4(255,255,255,255))
- EGP:egpSetText(42,DelvPrice+".-") EGP:egpColor(42,vec4(34,159,232,255))
- }
- }
- function number egpClick(Index, Cursor:vector2){
- EPos = EGP:egpPos(Index)
- ESize = EGP:egpSize(Index)
- if(inrange(Cursor, (EPos - ESize/2), (EPos + ESize/2)) ){
- return 1
- }
- return 0
- }
- function void wirelink:drawLogon() {
- This:egpClear()
- Amount = 1
- This:egpBox( 1,vec2(0,0),vec2(1024,1024) )
- This:egpMaterial(1,"console/background04")
- #Title
- This:egpBox( 4,vec2(256,60),vec2(1024,60) ) This:egpColor(4, vec4(0,0,0,190) )
- This:egpText(6,"OnlineWeps",vec2(256,33)) This:egpColor(6,vec4(255,255,255,255)) This:egpSize(6,50) This:egpAlign(6,1)
- #Login Button
- This:egpBox( 5,vec2(256,395),vec2(300,70) ) This:egpColor(5, vec4(0,0,0,160) )
- This:egpText(7,"Bestil v"+aa()+"ben",vec2(256,365)) This:egpColor(7,vec4(255,255,255,255)) This:egpSize(7,55) This:egpAlign(7,1)
- #Delivery
- This:egpBox( 41,vec2(375,187),vec2(110,40) ) This:egpColor(41, vec4(0,0,0,210) )
- This:egpBox( 47,vec2(191,187),vec2(220,40) ) This:egpColor(47, vec4(0,0,0,210) )
- This:egpText(42,"",vec2(377,171)) This:egpColor(42,vec4(255,0,0,255)) This:egpSize(42,30) This:egpAlign(42,1)
- This:egpText(49,"Fragtpris",vec2(152,171)) This:egpColor(49,vec4(255,255,255,255)) This:egpSize(49,30) This:egpAlign(49,1)
- #Profit
- This:egpBox( 45,vec2(375,237),vec2(110,40) ) This:egpColor(45, vec4(0,0,0,210) )
- This:egpBox( 48,vec2(191,237),vec2(220,40) ) This:egpColor(48, vec4(0,0,0,210) )
- This:egpText(46,Profit+".-",vec2(377,221)) This:egpColor(46,vec4(0,255,0,255)) This:egpSize(46,30) This:egpAlign(46,1)
- This:egpText(50,"V"+aa()+"ben profit",vec2(173,221)) This:egpColor(50,vec4(255,255,255,255)) This:egpSize(50,30) This:egpAlign(50,1)
- #Delv. Comp. Name
- This:egpBox( 43,vec2(256,130),vec2(350,45) ) This:egpColor(43, vec4(0,0,0,180) )
- This:egpText(44,"",vec2(256,114)) This:egpColor(44,vec4(255,255,255,255)) This:egpSize(44,30) This:egpAlign(44,1)
- #Made by
- This:egpText(67,"Udviklet af Thomads",vec2(256,495)) This:egpColor(67,vec4(255,255,255,255)) This:egpSize(67,15) This:egpAlign(67,1)
- Page = "Logon"
- getCheapComp()
- }
- function void wirelink:drawCategories() {
- This:egpClear()
- This:egpBox( 8,vec2(0,0),vec2(1024,1024) )
- This:egpMaterial(8,"console/background06")
- #Kategorier
- This:egpBox( 9,vec2(256,100),vec2(512,60) ) This:egpColor(9, vec4(0,0,0,110) )
- This:egpBox( 10,vec2(256,180),vec2(400,60)) This:egpColor(10, vec4(0,0,0,90) )
- This:egpBox( 11,vec2(256,250),vec2(400,60)) This:egpColor(11, vec4(0,0,0,90) )
- This:egpBox( 12,vec2(256,320),vec2(400,60)) This:egpColor(12, vec4(0,0,0,90) )
- This:egpBox( 13,vec2(256,390),vec2(400,60)) This:egpColor(13, vec4(0,0,0,90) )
- This:egpBox( 14,vec2(256,460),vec2(400,60)) This:egpColor(14, vec4(0,0,0,90) )
- #Fragt pris
- This:egpBox( 26,vec2(102,32),vec2(175,45)) This:egpColor(26, vec4(0,204,0,120) )
- This:egpText(27,"Fragt pris",vec2(100,10)) This:egpColor(27,vec4(250,250,250,255)) This:egpSize(27,40) This:egpAlign(27,1)
- This:egpBox( 28,vec2(262,32),vec2(130,45)) This:egpColor(28, vec4(255,81,0,120) )
- This:egpText(29,DelvPrice+".-",vec2(208,10)) This:egpColor(29,vec4(250,250,250,255)) This:egpSize(29,40) This:egpAlign(27,1)
- #Quit
- This:egpBox( 35,vec2(480,30),vec2(45,45)) This:egpColor(35, vec4(204,0,0,120) )
- This:egpText(36,"X",vec2(480,8)) This:egpSize(36,40) This:egpAlign(36,1)
- This:egpText(17,"V"+ae()+"lg kategori",vec2(256,80)) This:egpColor(17,vec4(250,250,250,255)) This:egpSize(17,37) This:egpAlign(17,1)
- This:egpText(18,"Rifler",vec2(256,160)) This:egpColor(18,vec4(250,250,250,90)) This:egpSize(18,37) This:egpAlign(18,1)
- This:egpText(19,"SMG'er",vec2(256,230)) This:egpColor(19,vec4(250,250,250,90)) This:egpSize(19,37) This:egpAlign(19,1)
- This:egpText(20,"Shotguns",vec2(256,300)) This:egpColor(20,vec4(250,250,250,90)) This:egpSize(20,37) This:egpAlign(20,1)
- This:egpText(21,"Snipere",vec2(256,370)) This:egpColor(21,vec4(250,250,250,90)) This:egpSize(21,37) This:egpAlign(21,1)
- This:egpText(22,"Pistoler",vec2(256,440)) This:egpColor(22,vec4(250,250,250,90)) This:egpSize(22,37) This:egpAlign(22,1)
- Page = "Categories"
- }
- function void amount(Index:number) {
- CurrWep = Index
- EGP:egpBox( 51,vec2(0,0),vec2(1024,1024) ) EGP:egpColor(51, vec4(0,0,0,220))
- EGP:egpColor(52, vec4(250,250,250,90))
- EGP:egpColor(53, vec4(250,250,250,90))
- EGP:egpColor(54, vec4(250,250,250,90))
- EGP:egpBox( 55,vec2(256,256),vec2(350,150) ) EGP:egpColor(55, vec4(20,20,20,255))
- EGP:egpBox( 56,vec2(256,206),vec2(350,50) ) EGP:egpColor(56, vec4(90,90,90,255))
- EGP:egpText(57,"V"+ae()+"lg antal",vec2(256,187)) EGP:egpColor(57,vec4(255,255,255,200)) EGP:egpSize(57,35) EGP:egpAlign(57,1)
- EGP:egpText(64,"1",vec2(185,262)) EGP:egpColor(64,vec4(255,255,255,200)) EGP:egpSize(64,35) EGP:egpAlign(64,1)
- #<
- EGP:egpBox( 58,vec2(136,280),vec2(40,40) ) EGP:egpColor(58, vec4(90,90,90,255))
- EGP:egpText(65,"<",vec2(135,260)) EGP:egpColor(65,vec4(255,255,255,200)) EGP:egpSize(65,35) EGP:egpAlign(65,1)
- #>
- EGP:egpBox( 59,vec2(236,280),vec2(40,40) ) EGP:egpColor(59, vec4(90,90,90,255))
- EGP:egpText(66,">",vec2(236,260)) EGP:egpColor(66,vec4(255,255,255,200)) EGP:egpSize(66,35) EGP:egpAlign(66,1)
- #Cancel
- EGP:egpBox( 60,vec2(346,300),vec2(110,25) ) EGP:egpColor(60, vec4(200,0,0,255))
- EGP:egpText(62,"Afvis",vec2(346,288)) EGP:egpColor(62,vec4(255,255,255,200)) EGP:egpSize(62,22) EGP:egpAlign(62,1)
- #Pay
- EGP:egpBox( 61,vec2(346,265),vec2(110,25) ) EGP:egpColor(61, vec4(0,200,0,255))
- EGP:egpText(63,"Betal",vec2(346,253)) EGP:egpColor(63,vec4(255,255,255,200)) EGP:egpSize(63,22) EGP:egpAlign(63,1)
- }
- function void wirelink:drawRifles1() {
- #Frem
- This:egpBox(33,vec2(480,100),vec2(60,60)) This:egpColor(33,vec4(0,0,0,0))
- This:egpTriangle(31,vec2(480,115),vec2(480,85),vec2(500,100))
- #Tilbage
- This:egpBox(34,vec2(30,100),vec2(60,60)) This:egpColor(34,vec4(0,0,0,0))
- This:egpRemove(30)
- This:egpSetText(17,"Rifler [1/3]")
- This:egpSetText(18,"AK47")
- This:egpSetText(19,"AK74")
- This:egpSetText(20,"Famas")
- This:egpSetText(21,"G3A1")
- This:egpSetText(22,"G36C")
- Page = "Rifles1"
- }
- function void wirelink:drawRifles2() {
- #Frem
- This:egpTriangle(31,vec2(480,115),vec2(480,85),vec2(500,100))
- #Tilbage
- This:egpTriangle(30,vec2(30,115),vec2(30,85),vec2(10,100))
- This:egpSetText(17,"Rifler [2/3]")
- This:egpSetText(18,"M4A1")
- This:egpSetText(19,"M14")
- This:egpSetText(20,"SKS")
- This:egpSetText(21,"RPK-48")
- This:egpSetText(22,"SG552")
- Page = "Rifles2"
- }
- function void wirelink:drawRifles3() {
- #Frem
- This:egpRemove(31)
- #Tilbage
- This:egpTriangle(30,vec2(30,115),vec2(30,85),vec2(10,100))
- This:egpSetText(17,"Rifler [3/3]")
- This:egpSetText(18,"SG550")
- This:egpSetText(19,"")
- This:egpSetText(20,"")
- This:egpSetText(21,"")
- This:egpSetText(22,"")
- Page = "Rifles3"
- }
- function void wirelink:drawSMG1() {
- This:egpSetText(17,"SMG'er")
- This:egpSetText(18,"PP-19 Bison")
- This:egpSetText(19,"MP5")
- This:egpSetText(20,"Uzi")
- This:egpSetText(21,"")
- This:egpSetText(22,"")
- Page = "SMG1"
- }
- function void wirelink:drawShotguns1() {
- This:egpSetText(17,"Shotguns")
- This:egpSetText(18,"KS-23")
- This:egpSetText(19,"M3 Shotgun")
- This:egpSetText(20,"")
- This:egpSetText(21,"")
- This:egpSetText(22,"")
- Page = "Shotguns1"
- }
- function void wirelink:drawSnipers1() {
- This:egpSetText(17,"Snipers")
- This:egpSetText(18,"M82")
- This:egpSetText(19,"M24")
- This:egpSetText(20,"M21")
- This:egpSetText(21,"SR-25")
- This:egpSetText(22,"")
- Page = "Snipers1"
- }
- function void wirelink:drawPistols1() {
- #Frem
- This:egpBox(33,vec2(480,100),vec2(60,60)) This:egpColor(33,vec4(0,0,0,0))
- This:egpTriangle(31,vec2(480,115),vec2(480,85),vec2(500,100))
- #Tilbage
- This:egpBox(34,vec2(30,100),vec2(60,60)) This:egpColor(34,vec4(0,0,0,0))
- This:egpRemove(30)
- This:egpSetText(17,"Pistoler [1/2]")
- This:egpSetText(18,"Deagle")
- This:egpSetText(19,"Glock-20")
- This:egpSetText(20,"Raging Bull")
- This:egpSetText(21,"M1911")
- This:egpSetText(22,"OTs-33")
- Page = "Pistols1"
- }
- function void wirelink:drawPistols2() {
- #Frem
- This:egpRemove(31)
- #Tilbage
- This:egpTriangle(30,vec2(30,115),vec2(30,85),vec2(10,100))
- This:egpSetText(17,"Pistoler [2/2]")
- This:egpSetText(18,"P228")
- This:egpSetText(19,"")
- This:egpSetText(20,"")
- This:egpSetText(21,"")
- This:egpSetText(22,"")
- Page = "Pistols2"
- }
- function void drawPending() {
- Trans = round(random(1,500))
- moneyRequest(CurUser, (DelvPrice+Profit+(WepPriceArray[CurrWep,number]*Amount)), "Transaktion #"+Trans, 10)
- EGP:egpBox( 40,vec2(0,0),vec2(1024,1024) ) EGP:egpColor(40, vec4(0,0,0,220))
- EGP:egpColor(30, vec4(250,250,250,90))
- EGP:egpColor(31, vec4(250,250,250,90))
- EGP:egpColor(17, vec4(250,250,250,90))
- EGP:egpBox( 37,vec2(256,256),vec2(500,100) ) EGP:egpColor(37, vec4(20,20,20,255))
- EGP:egpText(38,"Transaktion igang...",vec2(256,227)) EGP:egpColor(38,vec4(255,255,0,200)) EGP:egpSize(38,55) EGP:egpAlign(38,1)
- }
- function void wirelink:paymentAccepted() {
- This:egpSetText(38,"Dit v"+aa()+"ben er bestilt!") This:egpColor(38,vec4(50,255,50,200))
- }
- function void wirelink:paymentDenied() {
- This:egpSetText(38,"Betaling afvist!") This:egpColor(38,vec4(255,50,50,200))
- }
- function void wirelink:removeAmount() {
- }
- EGP:drawLogon()
- getCheapComp()
- timer("updatePrices",30000)
- }
- #Inputs
- Cursor = EGP:egpCursor(User)
- if(~User & User:keyUse() & ops()<100){
- if(Page == "Logon") { CurUser = User }
- if(User == CurUser) {
- #Categories - Nav
- if(egpClick(5,Cursor) & Page == "Logon") {
- EGP:drawCategories()
- timer("UserDistance",5000)
- }elseif(egpClick(10,Cursor) & Page == "Categories") {
- EGP:drawRifles1()
- }elseif(egpClick(11,Cursor) & Page == "Categories") {
- EGP:drawSMG1()
- }elseif(egpClick(12,Cursor) & Page == "Categories") {
- EGP:drawShotguns1()
- }elseif(egpClick(13,Cursor) & Page == "Categories") {
- EGP:drawSnipers1()
- }elseif(egpClick(14,Cursor) & Page == "Categories") {
- EGP:drawPistols1()
- }
- #Quit
- elseif(egpClick(35,Cursor)) {
- if(Page == "Categories") {
- EGP:drawLogon()
- }else{
- EGP:drawCategories()
- }
- }
- #Amount picking
- #<
- elseif(egpClick(58,Cursor)) {
- if(Amount >= 2) {
- Amount--
- EGP:egpSetText(64,Amount:toString())
- }
- }
- #>
- elseif(egpClick(59,Cursor)) {
- if(Amount <= 9) {
- Amount++
- EGP:egpSetText(64,Amount:toString())
- }
- }
- #Pay
- elseif(egpClick(61,Cursor)) {
- drawPending()
- }
- #Cancel
- elseif(egpClick(60,Cursor)) {
- EGP:drawLogon()
- }
- #Rifles - Nav
- elseif(egpClick(33,Cursor) & Page == "Rifles1") {
- EGP:drawRifles2()
- }elseif(egpClick(33,Cursor) & Page == "Rifles2") {
- EGP:drawRifles3()
- }elseif(egpClick(34,Cursor) & Page == "Rifles2") {
- EGP:drawRifles1()
- }elseif(egpClick(34,Cursor) & Page == "Rifles3") {
- EGP:drawRifles2()
- }
- #Pistols - Nav
- elseif(egpClick(33,Cursor) & Page == "Pistols1") {
- EGP:drawPistols2()
- }elseif(egpClick(34,Cursor) & Page == "Pistols2") {
- EGP:drawPistols1()
- }
- #1st Click
- elseif(egpClick(10,Cursor) & Page != "Categories") {
- if(Page == "Rifles1") { amount(1)
- }elseif(Page == "Rifles2") { amount(8)
- }elseif(Page == "Rifles3") { amount(25)
- }elseif(Page == "SMG1") { amount(18)
- }elseif(Page == "Shotguns1") { amount(9)
- }elseif(Page == "Snipers1") { amount(11)
- }elseif(Page == "Pistols1") { amount(5)
- }elseif(Page == "Pistols2") { amount(17) }
- }
- #2nd Click
- elseif(egpClick(11,Cursor) & Page != "Categories") {
- if(Page == "Rifles1") { amount(2)
- }elseif(Page == "Rifles2") { amount(10)
- }elseif(Page == "SMG1") { amount(19)
- }elseif(Page == "Shotguns1") { amount(22)
- }elseif(Page == "Snipers1") { amount(12)
- }elseif(Page == "Pistols1") { amount(6) }
- }
- #3rd Click
- elseif(egpClick(12,Cursor) & Page != "Categories") {
- if(Page == "Rifles1") { amount(3)
- }elseif(Page == "Rifles2") { amount(20)
- }elseif(Page == "SMG1") { amount(26)
- }elseif(Page == "Snipers1") { amount(13)
- }elseif(Page == "Pistols1") { amount(14) }
- }
- #4th Click
- elseif(egpClick(13,Cursor) & Page != "Categories") {
- if(Page == "Rifles1") { amount(4)
- }elseif(Page == "Rifles2") { amount(21)
- }elseif(Page == "Snipers1") { amount(23)
- }elseif(Page == "Pistols1") { amount(15) }
- }
- #5th Click
- elseif(egpClick(14,Cursor) & Page != "Categories") {
- if(Page == "Rifles1") { amount(7)
- }elseif(Page == "Rifles2") { amount(24)
- }elseif(Page == "Pistols1") { amount(16) }
- }
- }
- }
- ######### MobilePay #########
- if(moneyClk("Transaktion #"+Trans)) {
- timer("drawClk",100)
- dsSend("Transaction",Gname,Amount+"|5%w1>|"+CurUser:steamID()+"|5%w1>|"+WepArray[CurrWep,string])
- orderProduct(CurrShopID,CurrWep,Amount,Company,entity(Destination[1,number]))
- concmd("say /pm "+CurUser:steamID()+" Din ordre er blevet bestilt. Du modtager yderligere besked n"+aa()+"r din pakke er p"+aa()+" vej mod dig.")
- }elseif(moneyNoClk() | moneyTimeout()) {
- timer("drawNoClk",100)
- }
- ######### TIMERS #########
- if(clk("drawNoClk")){
- EGP:paymentDenied()
- timer("drawLogin",3000)
- }
- elseif(clk("drawClk")){
- EGP:paymentAccepted()
- timer("drawLogin",3000)}
- elseif(clk("drawLogin")){
- EGP:drawLogon() }
- elseif(clk("updatePrices")){
- getCheapComp()
- timer("updatePrices",30000) }
- elseif(clk("UserDistance")){
- if(Page != "Logon" & CurUser:pos():distance( EGP:entity():pos()) > 200){
- stoptimer("UserDistance")
- EGP:drawLogon()
- }else {
- timer("UserDistance",5000)
- }
- }
- #ChatClk
- if(chatClk() & chatClk(owner())){
- A = owner():lastSaid():lower():explode(" ")
- if(A[1,string]=="!profit") {
- hideChat(1)
- Profit = A[2,string]:toNumber()
- EGP:egpSetText(46,Profit+".-")
- }
- }
Add Comment
Please, Sign In to add comment