Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- @name Juus
- @inputs EGP:wirelink User:entity
- @outputs
- @persist [VIPOrder, NormalOrder, StarterKit, Destination, Whitelist, Hidden]:array [DelvPrice, FragtOmkostninger, ProduktOmkostninger, Indtaegt, AutoAdvert, ID, Page, Pos, MPAntal, StarterKitNumb, IDNumb]:number [Company,MPType,CompanyName,Advert,WhiteListS]:string [Produkter]:table
- @trigger
- if(first()) {
- # Krukker, Brusere, Vand, Toerre seeds, Syrig jord 1
- # 50k % fragt
- VIPOrder = array(7, 2, 5, 100, 3)
- # Krukker, Brusere, Vand, Toerre seeds, Syrig jord
- # 25.7k % fragt
- NormalOrder = array(4, 1, 3, 50, 2)
- # Automatisk advert
- Advert = "JuuHelper 1.2 - S"+oe()+"ger flotte blomsterkrukker til mine planter. Jeg betaler en fair pris for dem. PM mig."
- # Skal automatisk adverts vaere startet?
- AutoAdvert = 0
- # Table med priser og ID paa produkter
- Produkter["juu",table] = table()
- Produkter["juu",table]["seeds",array] = array("seeds", 2, 180)
- Produkter["juu",table]["jord",array] = array("jord", 17, 500)
- Produkter["juu",table]["vand",array] = array("vand", 15, 100)
- Produkter["juu",table]["bruser",array] = array("bruser", 14, 1000)
- Produkter["juu",table]["krukke",array] = array("krukke", 7, 3000)
- # Array med tilladte spillere
- Whitelist = array()
- # Antal penge brugt paa levering
- FragtOmkostninger = 0
- # Antal penge brugt paa produkter
- ProduktOmkostninger = 0
- # Antal indtaegt
- Indtaegt = 0
- ID = 20
- Pos = 71
- StarterKitNumb = 1
- Hidden = array()
- IDNumb = 0
- runOnChat(1)
- ##################################################################
- ############################ EGP ################################
- ##################################################################
- function string moneyFormat(M:number){
- local Q = M < 1000000 # No need to do math?
- local P = Q ? "^(-?%d+)(%d%d%d)" : "^(-?%d+)(%d%d%d)(%d%d%d)"
- local N = Q ? "%1,%2" : "%1,%2,%3"
- return M:toString():replaceRE(P, N) #Regular Expressions // Yaay
- }
- 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 string returnTime(){
- MMin=time("min")
- HHour=time("hour")+2
- if(MMin<10){Min="0"+MMin}
- else{Min=""+MMin}
- if(HHour<10){Hour="0"+HHour}
- elseif(HHour==24){Hour="00"}
- elseif(HHour==25){Hour="01"}
- elseif(HHour==26){Hour="02"}
- elseif(HHour==27){Hour="03"}
- elseif(HHour==28){Hour="04"}
- elseif(HHour==29){Hour="05"}
- elseif(HHour==30){Hour="06"}
- else{Hour=""+HHour}
- Tid=Hour+":"+Min
- return Tid
- }
- function void wirelink:draw() {
- Page = 1
- This:egpClear()
- This:egpBox( 1,vec2(0,0),vec2(1024,1024) ) This:egpColor(1,vec(39, 174, 96))
- This:egpBox(2,vec2(256,286),vec2(512,452)) This:egpColor(2,vec(255,255,255))
- This:egpText(3,"JuuHelper 1.2",vec2(18,14)) This:egpFont(3,"Arial") This:egpSize(3,35)
- This:egpText(61,"Lavet af Thomads", vec2(256,495)) This:egpAlign(61,1) This:egpFont(61,"Arial") This:egpSize(61,12) This:egpColor(61,vec(39, 174, 96))
- This:egpBox(62,vec2(450,32),vec2(90,30)) This:egpColor(62,vec4(70,70,70,200))
- This:egpText(63,"Stats",vec2(450,20)) This:egpAlign(63,1) This:egpFont(63,"Arial") This:egpSize(63,22)
- }
- function void wirelink:drawStats() {
- Page = 2
- This:egpBox(64,vec2(256,286),vec2(512,452)) This:egpColor(64,vec(236, 240, 241))
- This:egpSetText(63,"Logs")
- #Top 3 kasser
- This:egpBox(65,vec2(92,120),vec2(144,90)) This:egpColor(65,vec(46, 204, 113))
- This:egpBox(66,vec2(256,120),vec2(144,90)) This:egpColor(66,vec(46, 204, 113))
- This:egpBox(67,vec2(420,120),vec2(144,90)) This:egpColor(67,vec(46, 204, 113))
- ##Linjer i kasserne
- This:egpBox(70,vec2(92,88),vec2(144,25)) This:egpColor(70,vec(39, 174, 96))
- This:egpBox(71,vec2(256,88),vec2(144,25)) This:egpColor(71,vec(39, 174, 96))
- This:egpBox(68,vec2(420,88),vec2(144,25)) This:egpColor(68,vec(39, 174, 96))
- ## Tekst
- This:egpText(75,"Produkt udgifter",vec2(92,80)) This:egpFont(75,"Arial") This:egpSize(75,17) This:egpColor(75,vec(255,255,255)) This:egpAlign(75,1)
- This:egpText(76,"Fragt udgifter",vec2(256,80)) This:egpFont(76,"Arial") This:egpSize(76,17) This:egpColor(76,vec(255,255,255)) This:egpAlign(76,1)
- This:egpText(77,"Produkt indkomst",vec2(420,80)) This:egpFont(77,"Arial") This:egpSize(77,17) This:egpColor(77,vec(255,255,255)) This:egpAlign(77,1)
- #Antal
- This:egpText(80,moneyFormat(ProduktOmkostninger),vec2(92,115)) This:egpFont(80,"Arial") This:egpSize(80,35) This:egpAlign(80,1)
- This:egpText(81,moneyFormat(FragtOmkostninger),vec2(256,115)) This:egpFont(81,"Arial") This:egpSize(81,35) This:egpAlign(81,1)
- This:egpText(82,moneyFormat(Indtaegt),vec2(420,115)) This:egpFont(82,"Arial") This:egpSize(82,35) This:egpAlign(82,1)
- #Total indkomst
- #Base
- This:egpBox(83,vec2(256,230),vec2(472,90)) This:egpColor(83,vec(46, 204, 113))
- #Linje
- This:egpBox(84,vec2(256,198),vec2(472,25)) This:egpColor(84,vec(39, 174, 96))
- #Tekst
- This:egpText(85,"Total profit",vec2(256,190)) This:egpFont(85,"Arial") This:egpSize(85,17) This:egpColor(85,vec(255,255,255)) This:egpAlign(85,1)
- #Tekst 2
- This:egpText(86,moneyFormat((Indtaegt-(ProduktOmkostninger+FragtOmkostninger))),vec2(256,225)) This:egpFont(86,"Arial") This:egpSize(86,35) This:egpAlign(86,1)
- #Whitelisted
- #Base
- This:egpBox(87,vec2(256,340),vec2(472,90)) This:egpColor(87,vec(46, 204, 113))
- #Linje
- This:egpBox(88,vec2(256,308),vec2(472,25)) This:egpColor(88,vec(39, 174, 96))
- #Tekst
- This:egpText(89,"Whitelist",vec2(256,300)) This:egpFont(89,"Arial") This:egpSize(89,17) This:egpColor(89,vec(255,255,255)) This:egpAlign(89,1)
- #Tekst 2
- WhiteListS = ""
- for(I=1,Whitelist:count()){
- WhiteListS = WhiteListS + findPlayerBySteamID(Whitelist[I,string]):name() + ", "
- }
- This:egpText(90,WhiteListS,vec2(256,341)) This:egpFont(90,"Arial") This:egpSize(90,20) This:egpAlign(90,1)
- }
- function void wirelink:delStats() {
- Page = 1
- This:egpSetText(63,"Stats")
- This:egpRemove(64)
- This:egpRemove(65)
- This:egpRemove(66)
- This:egpRemove(67)
- This:egpRemove(68)
- This:egpRemove(69)
- This:egpRemove(70)
- This:egpRemove(71)
- This:egpRemove(72)
- This:egpRemove(73)
- This:egpRemove(74)
- This:egpRemove(75)
- This:egpRemove(76)
- This:egpRemove(77)
- This:egpRemove(78)
- This:egpRemove(79)
- This:egpRemove(80)
- This:egpRemove(81)
- This:egpRemove(82)
- This:egpRemove(83)
- This:egpRemove(84)
- This:egpRemove(85)
- This:egpRemove(86)
- This:egpRemove(87)
- This:egpRemove(88)
- This:egpRemove(89)
- This:egpRemove(90)
- }
- function void addLog(String:string) {
- if(ID>=59) {
- EGP:draw()
- ID = 20
- Pos = 71
- }
- if(Page == 2) {
- EGP:egpBox(ID,vec2(256,Pos+12),vec2(512,1)) EGP:egpColor(ID,vec4(39, 174, 96,0))
- EGP:egpText(ID+1,returnTime()+" | "+String,vec2(8,Pos-7)) EGP:egpSize(ID+1,14) EGP:egpFont(ID+1,"Marlett") EGP:egpColor(ID+1,vec4(39, 174, 96,0))
- Hidden:pushNumber(ID)
- Hidden:pushNumber(ID+1)
- }else{
- EGP:egpBox(ID,vec2(256,Pos+12),vec2(512,1)) EGP:egpColor(ID,vec(39, 174, 96))
- EGP:egpText(ID+1,returnTime()+" | "+String,vec2(8,Pos-7)) EGP:egpSize(ID+1,14) EGP:egpFont(ID+1,"Marlett") EGP:egpColor(ID+1,vec(39, 174, 96))
- }
- ID+=2
- Pos+=22
- }
- function void reAddLog() {
- if(Page != 2) {
- if(Hidden:count()!=0) {
- EGP:egpColor(Hidden[1,number],vec4(39,174,96,255))
- EGP:egpColor(Hidden[2,number],vec4(39,174,96,255))
- Hidden:removeNumber(1)
- Hidden:removeNumber(1)
- timer("reAddLog",2000)
- }
- }
- }
- ##########################################################
- ##########################################################
- ##########################################################
- ##########################################################
- function void msg(Txt:string,Col:string) {
- if(Col == "Hvid") {
- printColor(vec(0, 230, 64),"[",vec(255,255,255),"JuuHelper 1.2",vec(0,230,64),"] ",vec(255,255,255),Txt)
- }elseif(Col == "Roed") {
- printColor(vec(0, 230, 64),"[",vec(255,255,255),"JuuHelper 1.2",vec(0,230,64),"] ",vec(231, 76, 60),Txt)
- }elseif(Col == "Groen") {
- printColor(vec(0, 230, 64),"[",vec(255,255,255),"JuuHelper 1.2",vec(0,230,64),"] ",vec(46, 204, 113),Txt)
- }
- }
- function number erWhitelisted(S:string){
- for(I=0,Whitelist:count()){
- if(S==Whitelist[I,string]) {Listed = I}
- }
- if(Listed!=0){return Listed}
- else{return 0}
- }
- function void findFragt() {
- DelvPrice = 100000
- Id = 0
- OldComp = Company
- Destination = getDestinationIDs()
- foreach(K, Comp:string = getDeliveryCompanyIDs()) {
- Id++
- PriceDeliver = getDeliveryCompany(Comp)["Prices",table]["FromWeb",number] + getDeliveryCompany(Comp)["Prices",table]["ToHouse",number]
- if(PriceDeliver < DelvPrice) {
- DelvPrice = PriceDeliver
- Company = Comp
- CompanyName = getDeliveryCompany(Comp)["Name",string]
- }
- }
- if(Id == 0) {
- # Sae er der intet fragtfirma
- # Pris: 1750 for levering (IKKE SIKKER)
- DelvPrice = 1750
- Company = ""
- CompanyName = "Statens Pakkeservice"
- if(OldComp != Company) { msg("Der er ikke l"+ae()+"ngere nogle fragtfirmaer, og dine pakker vil derfor blive leveret af staten. ["+DelvPrice+".-] Pr. pakke.","Hvid") }
- }else{
- # Sae har den fundet billigste fragtfirma
- # CompanyName, Company og DelvPrice er nu sat
- if(OldComp != Company & (OldComp != "")) { msg("Der er blevet fundet et billigere fragtfirma.","Groen") msg("Du f"+aa()+"r nu leveret dine pakker af "+CompanyName+". ["+DelvPrice+".- Pr. pakke.]","Groen") }
- }
- }
- function void bestilling(Type:string, Antal:number, ErEjer:number, Msg:number) {
- findFragt()
- if(ErEjer == 1) {
- if(Destination:count() == 0) { msg("Du har ikke nogle aktive leveringspunkter!","Roed")
- }elseif (Antal <= 0) { msg("Ugyldig bestilling!","Roed") } else {
- Type = Type:replace("!","")
- OrderID = 0
- orderProduct("SR",Produkter["juu",table][Type,array][2,number],Antal,Company,entity(Destination[1,number]))
- FragtOmkostninger += DelvPrice
- ProduktOmkostninger += Produkter["juu",table][Type,array][3,number]*Antal
- if(Msg == 1) {
- addLog(owner():name()+" har bestilt et StarterKit fra "+CompanyName+".")
- } elseif(Msg == 2) {
- msg("K"+oe()+"b gennemf"+oe()+"rt. Du har bestilt "+Antal+" "+Type+" fra "+CompanyName+".", "Hvid")
- addLog(owner():name()+" har bestilt "+Antal+" "+Type+" fra "+CompanyName+".")
- } else {
- }
- }
- } else {
- if(Destination:count() == 0) { concmd("say /pm "+lastSpoke():steamID()+" [JuuHelper 1.2] Der er ingen aktive leveringspunkter!")
- } elseif (Antal <= 0) { concmd("say /pm "+lastSpoke():steamID()+" [JuuHelper 1.2] Ugyldig bestilling!") } else {
- moneyRequest(lastSpoke(),1,"Bekr"+ae()+"ft ordre.",5)
- MPType = Type
- MPAntal = Antal
- }
- }
- }
- function void findStarterkit() {
- findFragt()
- if(owner():isVIP()) {
- StarterKit = VIPOrder
- } else {
- StarterKit = NormalOrder
- }
- if(Destination:count() != 0) {
- msg("Dit starterkit er blevet bestilt:","Hvid")
- msg(StarterKit[1,number] + " Krukker, " + StarterKit[2,number] + " Brusere, " + StarterKit[3,number] + " Vand, " + StarterKit[4,number] + " T"+oe()+"rre seeds, " + StarterKit[5,number] + " Syrig jord.","Hvid")
- timer("starterkit",1000)
- } else {
- msg("Du har ikke nogle aktive leveringspunkter!","Roed")
- }
- }
- function void addWeed(PlyS:string) {
- if(Whitelist:count() < 5) {
- if(!erWhitelisted(PlyS) & PlyS != owner():steamID()) {
- Whitelist:pushString(PlyS)
- msg(findPlayerBySteamID(PlyS):name()+" har f"+aa()+"et tilladelse til at bestille produkter p"+aa()+" din regning.","Groen")
- concmd("say /pm "+PlyS+" [JuuHelper 1.2] "+owner():name()+" har givet dig adgang til at bestille produkter!")
- } else {
- msg(findPlayerBySteamID(PlyS):name()+" har allerede tilladelse til at bestille produkter.","Roed")
- }
- } else {
- msg("Der kan ikke v"+ae()+"re whitelisted mere end fem personer!","Roed")
- }
- }
- function void fjernWeed(PlyS:string) {
- if(erWhitelisted(PlyS)) {
- msg(findPlayerBySteamID(PlyS):name()+" har ikke l"+ae()+"ngere tilladelse til at bestille produkter p"+aa()+" din regning.","Groen")
- Whitelist:remove(erWhitelisted(PlyS))
- }
- }
- function void advert() {
- if(AutoAdvert == 1) {
- concmd("say /advert "+Advert)
- timer("advert",180000)
- }
- timer("Advert",180000)
- }
- EGP:draw()
- advert()
- timer("showcmd",3000)
- }
- ##################################################################
- ############################ CHAT ################################
- ##################################################################
- if(chatClk() & ops()< 50) {
- LS = lastSaid():lower():explode(" ")
- if(LS[1,string]=="!seeds" || LS[1,string]=="!jord" || LS[1,string]=="!vand" || LS[1,string]=="!bruser") {
- LSP = lastSpoke()
- if(erWhitelisted(LSP:steamID())){
- bestilling(LS[1,string],LS[2,string]:toNumber(),0,2)
- }
- }
- }
- if(chatClk(owner()) & ops()< 50){
- A = owner():lastSaid():lower():explode(" ")
- if(A[1,string]=="!seeds" || A[1,string]=="!jord" || A[1,string]=="!vand" || A[1,string]=="!bruser" || A[1,string]=="!krukke") {
- hideChat(1)
- bestilling(A[1,string],A[2,string]:toNumber(),1,2)
- }
- elseif(A[1,string]=="!starterkit") {
- hideChat(1)
- findStarterkit()
- }elseif((A[1,string]=="!addweed") & (findPlayerByName(owner():lastSaid():replace("!addweed ","")):isValid())) {
- hideChat(1)
- NewPly = findPlayerByName(owner():lastSaid():replace("!addweed ","")):steamID()
- addWeed(NewPly)
- }elseif(A[1,string]=="!fjernweed" & (findPlayerByName(owner():lastSaid():replace("!fjernweed ","")):isValid())){
- hideChat(1)
- NewPly = findPlayerByName(owner():lastSaid():replace("!fjernweed ","")):steamID()
- fjernWeed(NewPly)
- }elseif(A[1,string]=="!indt"+ae()+"gt" & (A[2,string]:toNumber() != 0)){
- hideChat(1)
- Indtaegt += A[2,string]:toNumber()
- msg("En indt"+ae()+"gt p"+aa()+" "+moneyFormat(A[2,string]:toNumber())+" kr. er blevet registreret.","Groen")
- }elseif(A[1,string]=="!udgift" & (A[2,string]:toNumber() != 0)){
- hideChat(1)
- ProduktOmkostninger += A[2,string]:toNumber()
- msg("En udgift p"+aa()+" "+moneyFormat(A[2,string]:toNumber())+" kr. er blevet registreret.","Groen")
- }elseif((A[1,string]=="!status")) {
- hideChat(1)
- msg("Du har brugt "+moneyFormat(FragtOmkostninger)+".- p"+aa()+" fragtomkostninger.","Hvid")
- msg("Du har brugt "+moneyFormat(ProduktOmkostninger)+".- p"+aa()+" diverse produkter.","Hvid")
- msg("Total udgifter: "+moneyFormat((FragtOmkostninger+ProduktOmkostninger))+".-","Groen")
- }elseif((A[1,string]=="!advert")) {
- hideChat(1)
- if(AutoAdvert == 0) {
- msg("T"+ae()+"ndte for auto advert.","Hvid")
- AutoAdvert = 1
- } else {
- msg("Slukkede for auto advert.","Hvid")
- AutoAdvert = 0
- }
- }elseif((LS[1,string]=="!help") || (LS[1,string] == "!hj"+ae()+"lp") || (LS[1,string]=="/help")) {
- hideChat(1)
- msg("Kommandoer:","Groen")
- msg("[!seeds, !jord, !vand, !bruser, !krukke] antal | Bestiller ting | eks: !seeds 2","Hvid")
- msg("!addweed Thomads | Giver Thomads lov til at bestille p"+aa()+" DIN regning","Hvid")
- msg("!fjernweed Thomads | Fjerner ovenst"+aa()+"ende tilladelser","Hvid")
- msg("!indt"+ae()+"gt antal | Tilf"+oe()+"jer din weed indkomst til statistikken","Hvid")
- msg("!udgift antal | Tilf"+oe()+"jer en udgift til statistikken","Hvid")
- msg("!status | Printer manuelt statikker","Hvid")
- msg("!advert | T"+ae()+"nder og slukker for auto advert","Hvid")
- }
- }
- ##################################################################
- ############################ TIMERS ##############################
- ##################################################################
- if(clk("Advert")) { advert() }
- elseif(clk("starterkit")) {
- if(StarterKitNumb == 1) {
- bestilling("krukke",StarterKit[1,number],1,1)
- StarterKitNumb++
- timer("starterkit",1500)
- }elseif(StarterKitNumb == 2) {
- bestilling("bruser",StarterKit[2,number],1,0)
- StarterKitNumb++
- timer("starterkit",1500)
- }elseif(StarterKitNumb == 3) {
- bestilling("vand",StarterKit[3,number],1,0)
- StarterKitNumb++
- timer("starterkit",1500)
- }elseif(StarterKitNumb == 4) {
- bestilling("seeds",StarterKit[4,number],1,0)
- StarterKitNumb++
- timer("starterkit",1500)
- }elseif(StarterKitNumb == 5) {
- bestilling("jord",StarterKit[5,number],1,0)
- StarterKitNumb = 1
- }
- }elseif(clk("reAddLog")) {
- reAddLog()
- }elseif(clk("showcmd")) {
- concmd("say !help")
- }
- if(moneyClk("Bekr"+ae()+"ft ordre.")) {
- Type = MPType:replace("!","")
- OrderID = 0
- orderProduct("SR",Produkter["juu",table][Type,array][2,number],MPAntal,Company,entity(Destination[1,number]))
- FragtOmkostninger += DelvPrice
- ProduktOmkostninger += Produkter["juu",table][Type,array][3,number]*MPAntal
- concmd("say /pm "+moneyClkPlayer():steamID()+" [JuuHelper 1.2] K"+oe()+"b gennemf"+oe()+"rt. Du har bestilt "+MPAntal+" "+Type+" fra "+CompanyName+".")
- addLog(moneyClkPlayer():name()+" har bestilt "+MPAntal+" "+Type+" fra "+CompanyName+".")
- }
- ##################################################################
- ############################ ETC #################################
- ##################################################################
- if(~User & User:keyUse() & ops()<50){
- Cursor = EGP:egpCursor(User)
- if(egpClick(62,Cursor) & Page == 1 ) {
- EGP:drawStats()
- }else {
- EGP:delStats()
- timer("reAddLog",2000)
- }
- }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement