mirror of
https://github.com/goonstation/goonstation-2020.git
synced 2026-07-12 07:32:20 +01:00
ZeWaka
402 lines
16 KiB
Plaintext
402 lines
16 KiB
Plaintext
/obj/submachine/slot_machine
|
|
name = "Slot Machine"
|
|
desc = "Gambling for the antisocial."
|
|
icon = 'icons/obj/gambling.dmi'
|
|
icon_state = "slots-off"
|
|
anchored = 1
|
|
density = 1
|
|
mats = 8
|
|
deconstruct_flags = DECON_SIMPLE
|
|
//var/money = 1000000
|
|
var/plays = 0
|
|
var/working = 0
|
|
var/obj/item/card/id/scan = null
|
|
|
|
New()
|
|
mechanics = new(src)
|
|
mechanics.master = src
|
|
mechanics.addInput("activate", "activateinput")
|
|
..()
|
|
|
|
proc/activateinput(var/datum/mechanicsMessage/inp) //make this work some day.
|
|
//var/list/reflist = list("ops")
|
|
//Topic(null,
|
|
return
|
|
|
|
attackby(var/obj/item/I as obj, user as mob)
|
|
if(istype(I, /obj/item/card/id))
|
|
if(src.scan)
|
|
boutput(user, "<span style=\"color:red\">There is a card already in the slot machine.</span>")
|
|
else
|
|
boutput(user, "<span style=\"color:blue\">You insert your ID card.</span>")
|
|
usr.drop_item()
|
|
I.set_loc(src)
|
|
src.scan = I
|
|
src.updateUsrDialog()
|
|
else src.attack_hand(user)
|
|
return
|
|
|
|
attack_hand(var/mob/user as mob)
|
|
user.machine = src
|
|
if (!src.scan)
|
|
var/dat = {"<B>Slot Machine</B><BR>
|
|
<HR><BR>
|
|
<B>Please insert card!</B><BR>"}
|
|
user.Browse(dat, "window=slotmachine;size=450x500")
|
|
onclose(user, "slotmachine")
|
|
else if (src.working)
|
|
var/dat = {"<B>Slot Machine</B><BR>
|
|
<HR><BR>
|
|
<B>Please wait!</B><BR>"}
|
|
user.Browse(dat, "window=slotmachine;size=450x500")
|
|
onclose(user, "slotmachine")
|
|
else
|
|
var/dat = {"<B>Slot Machine</B><BR>
|
|
<HR><BR>
|
|
Twenty credits to play!<BR>
|
|
<B>Your Card:</B> [src.scan]<BR>
|
|
<B>Credits Remaining:</B> [src.scan.money]<BR>
|
|
[src.plays] attempts have been made today!<BR>
|
|
<HR><BR>
|
|
<A href='?src=\ref[src];ops=1'>Play!</A><BR>
|
|
<A href='?src=\ref[src];ops=2'>Eject card</A>"}
|
|
user.Browse(dat, "window=slotmachine;size=400x500")
|
|
onclose(user, "slotmachine")
|
|
|
|
Topic(href, href_list)
|
|
if (get_dist(src, usr) > 1 || !isliving(usr) || iswraith(usr) || isintangible(usr))
|
|
return
|
|
if (usr.getStatusDuration("stunned") > 0 || usr.getStatusDuration("weakened") || usr.getStatusDuration("paralysis") > 0 || !isalive(usr) || usr.restrained())
|
|
return
|
|
|
|
if(href_list["ops"])
|
|
var/operation = text2num(href_list["ops"])
|
|
if(operation == 1) // Play
|
|
if(src.working) return
|
|
if(!src.scan) return
|
|
if (src.scan.money < 20)
|
|
for(var/mob/O in hearers(src, null))
|
|
O.show_message(text("<span style='color:#888888'><b>[]</b> says, 'Insufficient money to play!'</span>", src), 1)
|
|
return
|
|
/*if (src.money < 0)
|
|
for(var/mob/O in hearers(src, null))
|
|
O.show_message(text("<b>[]</b> says, 'No prize money left!'", src), 1)
|
|
return*/
|
|
src.scan.money -= 20
|
|
//src.money += 10
|
|
src.plays += 1
|
|
src.working = 1
|
|
src.icon_state = "slots-on"
|
|
//for(var/mob/O in hearers(src, null))
|
|
//O.show_message(text("<b>[]</b> says, 'Let's roll!'", src), 1)
|
|
var/roll = rand(1,1350)
|
|
|
|
playsound(src.loc, "sound/machines/ding.ogg", 50, 1)
|
|
SPAWN_DBG(2.5 SECONDS) // why was this at ten seconds, christ
|
|
if (roll == 1)
|
|
for(var/mob/O in hearers(src, null))
|
|
O.show_message(text("<span style='color:#888888'><b>[]</b> says, 'JACKPOT! [src.scan.registered] has won a MILLION CREDITS!'</span>", src), 1)
|
|
command_alert("Congratulations to [src.scan.registered] on winning the Jackpot of ONE MILLION CREDITS!", "Jackpot Winner")
|
|
playsound(src.loc, "sound/misc/airraid_loop_short.ogg", 55, 1)
|
|
src.scan.money += 1000000
|
|
//src.money = 0
|
|
else if (roll > 1 && roll <= 5)
|
|
for(var/mob/O in hearers(src, null))
|
|
O.show_message(text("<span style='color:#888888'><b>[]</b> says, 'Big Winner! [src.scan.registered] has won a hundred thousand credits!'</span>", src), 1)
|
|
command_alert("Congratulations to [src.scan.registered] on winning a hundred thousand credits!", "Big Winner")
|
|
playsound(src.loc, "sound/misc/klaxon.ogg", 55, 1)
|
|
src.scan.money += 100000
|
|
//src.money -= 100000
|
|
else if (roll > 5 && roll <= 25)
|
|
for(var/mob/O in hearers(src, null))
|
|
O.show_message(text("<span style='color:#888888'><b>[]</b> says, 'Big Winner! [src.scan.registered] has won ten thousand credits!'</span>", src), 1)
|
|
playsound(src.loc, "sound/misc/klaxon.ogg", 55, 1)
|
|
src.scan.money += 10000
|
|
//src.money -= 10000
|
|
else if (roll > 25 && roll <= 50)
|
|
for(var/mob/O in hearers(src, null))
|
|
O.show_message(text("<span style='color:#888888'><b>[]</b> says, 'Winner! [src.scan.registered] has won a thousand credits!'</span>", src), 1)
|
|
playsound(src.loc, "sound/musical_instruments/Bell_Huge_1.ogg", 55, 1)
|
|
src.scan.money += 1000
|
|
//src.money -= 1000
|
|
else if (roll > 50 && roll <= 100)
|
|
for(var/mob/O in hearers(src, null))
|
|
O.show_message(text("<span style='color:#888888'><b>[]</b> says, 'Winner! [src.scan.registered] has won a hundred credits!'</span>", src), 1)
|
|
playsound(src.loc, "sound/musical_instruments/Bell_Huge_1.ogg", 55, 1)
|
|
src.scan.money += 100
|
|
//src.money -= 100
|
|
else if (roll > 100 && roll <= 200)
|
|
for(var/mob/O in hearers(src, null))
|
|
O.show_message(text("<span style='color:#888888'><b>[]</b> says, 'Winner! [src.scan.registered] has won fifty credits!'</span>", src), 1)
|
|
playsound(src.loc, "sound/machines/ping.ogg", 55, 1)
|
|
src.scan.money += 50
|
|
//src.money -= 50
|
|
else if (roll > 200 && roll <= 500)
|
|
for(var/mob/O in hearers(src, null))
|
|
O.show_message(text("<span style='color:#888888'><b>[]</b> says, '[src.scan.registered] has won ten credits!'</span>", src), 1)
|
|
playsound(src.loc, "sound/machines/ping.ogg", 55, 1)
|
|
src.scan.money += 10
|
|
//src.money -= 10
|
|
else
|
|
for(var/mob/O in hearers(src, null))
|
|
O.show_message(text("<span style='color:#888888'><b>[]</b> says, 'No luck!'</span>", src), 1)
|
|
//playsound(src.loc, "sound/machines/buzz-two.ogg", 55, 1) // way too loud UGH
|
|
src.working = 0
|
|
src.icon_state = "slots-off"
|
|
updateUsrDialog()
|
|
if(operation == 2) // Eject Card
|
|
if(!src.scan) return // jerks doing that "hide in a chute to glitch auto-update windows out" exploit caused a wall of runtime errors
|
|
src.scan.set_loc(src.loc)
|
|
src.scan = null
|
|
src.working = 0
|
|
src.icon_state = "slots-off" // just in case, some fucker broke it earlier
|
|
for(var/mob/O in hearers(src, null))
|
|
O.show_message(text("<span style='color:#888888'><b>[]</b> says, 'Thank you for playing!'</span>", src), 1)
|
|
src.add_fingerprint(usr)
|
|
src.updateUsrDialog()
|
|
if(mechanics) mechanics.fireOutgoing(mechanics.newSignal("machineUsed"))
|
|
return
|
|
|
|
/obj/submachine/slot_machine_manta
|
|
name = "Slot Machine"
|
|
desc = "Gambling for the antisocial."
|
|
icon = 'icons/obj/gambling.dmi'
|
|
icon_state = "slotsnew-off"
|
|
anchored = 1
|
|
density = 1
|
|
mats = 8
|
|
deconstruct_flags = DECON_SCREWDRIVER | DECON_WRENCH | DECON_CROWBAR | DECON_WELDER | DECON_MULTITOOL
|
|
//var/money = 1000000
|
|
var/plays = 0
|
|
var/working = 0
|
|
var/obj/item/card/id/scan = null
|
|
|
|
New()
|
|
mechanics = new(src)
|
|
mechanics.master = src
|
|
mechanics.addInput("activate", "activateinput")
|
|
..()
|
|
|
|
proc/activateinput(var/datum/mechanicsMessage/inp) //make this work some day.
|
|
//var/list/reflist = list("ops")
|
|
//Topic(null,
|
|
return
|
|
|
|
attackby(var/obj/item/I as obj, user as mob)
|
|
if(istype(I, /obj/item/card/id))
|
|
if(src.scan)
|
|
boutput(user, "<span style=\"color:red\">There is a card already in the slot machine.</span>")
|
|
else
|
|
boutput(user, "<span style=\"color:blue\">You insert your ID card.</span>")
|
|
usr.drop_item()
|
|
I.set_loc(src)
|
|
src.scan = I
|
|
src.updateUsrDialog()
|
|
else src.attack_hand(user)
|
|
return
|
|
|
|
attack_hand(var/mob/user as mob)
|
|
user.machine = src
|
|
if (!src.scan)
|
|
var/dat = {"<B>Slot Machine</B><BR>
|
|
<HR><BR>
|
|
<B>Please insert card!</B><BR>"}
|
|
user.Browse(dat, "window=slotmachine;size=450x500")
|
|
onclose(user, "slotmachine")
|
|
else if (src.working)
|
|
var/dat = {"<B>Slot Machine</B><BR>
|
|
<HR><BR>
|
|
<B>Please wait!</B><BR>"}
|
|
user.Browse(dat, "window=slotmachine;size=450x500")
|
|
onclose(user, "slotmachine")
|
|
else
|
|
var/dat = {"<B>Slot Machine</B><BR>
|
|
<HR><BR>
|
|
Twenty credits to play!<BR>
|
|
<B>Your Card:</B> [src.scan]<BR>
|
|
<B>Credits Remaining:</B> [src.scan.money]<BR>
|
|
[src.plays] attempts have been made today!<BR>
|
|
<HR><BR>
|
|
<A href='?src=\ref[src];ops=1'>Play!</A><BR>
|
|
<A href='?src=\ref[src];ops=2'>Eject card</A>"}
|
|
user.Browse(dat, "window=slotmachine;size=400x500")
|
|
onclose(user, "slotmachine")
|
|
|
|
Topic(href, href_list)
|
|
if (get_dist(src, usr) > 1 || !isliving(usr) || iswraith(usr) || isintangible(usr))
|
|
return
|
|
if (usr.getStatusDuration("stunned") > 0 || usr.getStatusDuration("weakened") || usr.getStatusDuration("paralysis") > 0 || !isalive(usr) || usr.restrained())
|
|
return
|
|
|
|
if(href_list["ops"])
|
|
var/operation = text2num(href_list["ops"])
|
|
if(operation == 1) // Play
|
|
if(src.working) return
|
|
if(!src.scan) return
|
|
if (src.scan.money < 20)
|
|
for(var/mob/O in hearers(src, null))
|
|
O.show_message(text("<span style='color:#888888'><b>[]</b> says, 'Insufficient money to play!'</span>", src), 1)
|
|
return
|
|
/*if (src.money < 0)
|
|
for(var/mob/O in hearers(src, null))
|
|
O.show_message(text("<b>[]</b> says, 'No prize money left!'", src), 1)
|
|
return*/
|
|
src.scan.money -= 20
|
|
//src.money += 10
|
|
src.plays += 1
|
|
src.working = 1
|
|
src.icon_state = "slotsnew-on"
|
|
//for(var/mob/O in hearers(src, null))
|
|
//O.show_message(text("<b>[]</b> says, 'Let's roll!'", src), 1)
|
|
var/roll = rand(1,1350)
|
|
|
|
playsound(src.loc, "sound/machines/ding.ogg", 50, 1)
|
|
SPAWN_DBG(2.5 SECONDS) // why was this at ten seconds, christ
|
|
if (roll == 1)
|
|
for(var/mob/O in hearers(src, null))
|
|
O.show_message(text("<span style='color:#888888'><b>[]</b> says, 'JACKPOT! [src.scan.registered] has won a MILLION CREDITS!'</span>", src), 1)
|
|
command_alert("Congratulations to [src.scan.registered] on winning the Jackpot of ONE MILLION CREDITS!", "Jackpot Winner")
|
|
playsound(src.loc, "sound/misc/airraid_loop_short.ogg", 55, 1)
|
|
src.scan.money += 1000000
|
|
//src.money = 0
|
|
else if (roll > 1 && roll <= 5)
|
|
for(var/mob/O in hearers(src, null))
|
|
O.show_message(text("<span style='color:#888888'><b>[]</b> says, 'Big Winner! [src.scan.registered] has won a hundred thousand credits!'</span>", src), 1)
|
|
command_alert("Congratulations to [src.scan.registered] on winning a hundred thousand credits!", "Big Winner")
|
|
playsound(src.loc, "sound/misc/klaxon.ogg", 55, 1)
|
|
src.scan.money += 100000
|
|
//src.money -= 100000
|
|
else if (roll > 5 && roll <= 25)
|
|
for(var/mob/O in hearers(src, null))
|
|
O.show_message(text("<span style='color:#888888'><b>[]</b> says, 'Big Winner! [src.scan.registered] has won ten thousand credits!'</span>", src), 1)
|
|
playsound(src.loc, "sound/misc/klaxon.ogg", 55, 1)
|
|
src.scan.money += 10000
|
|
//src.money -= 10000
|
|
else if (roll > 25 && roll <= 50)
|
|
for(var/mob/O in hearers(src, null))
|
|
O.show_message(text("<span style='color:#888888'><b>[]</b> says, 'Winner! [src.scan.registered] has won a thousand credits!'</span>", src), 1)
|
|
playsound(src.loc, "sound/musical_instruments/Bell_Huge_1.ogg", 55, 1)
|
|
src.scan.money += 1000
|
|
//src.money -= 1000
|
|
else if (roll > 50 && roll <= 100)
|
|
for(var/mob/O in hearers(src, null))
|
|
O.show_message(text("<span style='color:#888888'><b>[]</b> says, 'Winner! [src.scan.registered] has won a hundred credits!'</span>", src), 1)
|
|
playsound(src.loc, "sound/musical_instruments/Bell_Huge_1.ogg", 55, 1)
|
|
src.scan.money += 100
|
|
//src.money -= 100
|
|
else if (roll > 100 && roll <= 200)
|
|
for(var/mob/O in hearers(src, null))
|
|
O.show_message(text("<span style='color:#888888'><b>[]</b> says, 'Winner! [src.scan.registered] has won fifty credits!'</span>", src), 1)
|
|
playsound(src.loc, "sound/machines/ping.ogg", 55, 1)
|
|
src.scan.money += 50
|
|
//src.money -= 50
|
|
else if (roll > 200 && roll <= 500)
|
|
for(var/mob/O in hearers(src, null))
|
|
O.show_message(text("<span style='color:#888888'><b>[]</b> says, '[src.scan.registered] has won ten credits!'</span>", src), 1)
|
|
playsound(src.loc, "sound/machines/ping.ogg", 55, 1)
|
|
src.scan.money += 10
|
|
//src.money -= 10
|
|
else
|
|
for(var/mob/O in hearers(src, null))
|
|
O.show_message(text("<span style='color:#888888'><b>[]</b> says, 'No luck!'</span>", src), 1)
|
|
//playsound(src.loc, "sound/machines/buzz-two.ogg", 55, 1) // way too loud UGH
|
|
src.working = 0
|
|
src.icon_state = "slotsnew-off"
|
|
updateUsrDialog()
|
|
if(operation == 2) // Eject Card
|
|
if(!src.scan) return // jerks doing that "hide in a chute to glitch auto-update windows out" exploit caused a wall of runtime errors
|
|
src.scan.set_loc(src.loc)
|
|
src.scan = null
|
|
src.working = 0
|
|
src.icon_state = "slotsnew-off" // just in case, some fucker broke it earlier
|
|
for(var/mob/O in hearers(src, null))
|
|
O.show_message(text("<span style='color:#888888'><b>[]</b> says, 'Thank you for playing!'</span>", src), 1)
|
|
src.add_fingerprint(usr)
|
|
src.updateUsrDialog()
|
|
if(mechanics) mechanics.fireOutgoing(mechanics.newSignal("machineUsed"))
|
|
return
|
|
|
|
/obj/submachine/slot_machine/cursed
|
|
name = "Slot Machine"
|
|
desc = "Gambling for the damned."
|
|
icon = 'icons/obj/gambling.dmi'
|
|
icon_state = "slots-off"
|
|
|
|
New()
|
|
mechanics = new(src)
|
|
mechanics.master = src
|
|
mechanics.addInput("activate", "activateinput")
|
|
..()
|
|
|
|
attack_hand(var/mob/user as mob)
|
|
user.machine = src
|
|
if (src.working)
|
|
var/dat = {"<B>Slot Machine</B><BR>
|
|
<HR><BR>
|
|
<B>Please wait!</B><BR>"}
|
|
user.Browse(dat, "window=slotmachine;size=450x500")
|
|
onclose(user, "slotmachine")
|
|
else
|
|
var/dat = {"<B>Slot Machine</B><BR>
|
|
<HR><BR>
|
|
Free to play - IF YOU DARE!<BR>
|
|
[src.plays] attempts have been made today!<BR>
|
|
<HR><BR>
|
|
<A href='?src=\ref[src];ops=1'>Play!</A><BR>"}
|
|
user.Browse(dat, "window=slotmachine;size=400x500")
|
|
onclose(user, "slotmachine")
|
|
|
|
Topic(href, href_list)
|
|
if (get_dist(src, usr) > 1 || !isliving(usr) || iswraith(usr) || isintangible(usr))
|
|
return
|
|
if (usr.getStatusDuration("stunned") > 0 || usr.getStatusDuration("weakened") || usr.getStatusDuration("paralysis") > 0 || !isalive(usr) || usr.restrained())
|
|
return
|
|
|
|
if(href_list["ops"])
|
|
var/operation = text2num(href_list["ops"])
|
|
if(operation == 1) // Play
|
|
if(src.working) return
|
|
/*if (src.money < 0)
|
|
for(var/mob/O in hearers(src, null))
|
|
O.show_message(text("<b>[]</b> says, 'No prize money left!'", src), 1)
|
|
return*/
|
|
//src.money += 10
|
|
src.plays += 1
|
|
src.working = 1
|
|
src.icon_state = "slots-on"
|
|
//for(var/mob/O in hearers(src, null))
|
|
//O.show_message(text("<b>[]</b> says, 'Let's roll!'", src), 1)
|
|
var/roll = rand(1,101)
|
|
|
|
playsound(src.loc, "sound/machines/ding.ogg", 50, 1)
|
|
SPAWN_DBG(2.5 SECONDS)
|
|
if (roll == 1)
|
|
for(var/mob/O in hearers(src, null))
|
|
O.show_message(text("<span style='color:#888888'><b>[]</b> says, 'JACKPOT! [usr.name] has won their freedom!'</span>", src), 1)
|
|
playsound(src.loc, "sound/voice/heavenly.ogg", 55, 1)
|
|
usr.un_damn()
|
|
else if(roll > 1 && roll <= 10 && istype(usr,/mob/living/carbon/human))
|
|
for(var/mob/O in hearers(src, null))
|
|
O.show_message(text("<span style='color:#888888'><b>[]</b> says, '[usr.name] has a limb ripped off by the machine!'</span>", src), 1)
|
|
playsound(src.loc, "sound/machines/ping.ogg", 55, 1)
|
|
var/mob/living/carbon/human/H = usr
|
|
if(H.limbs.l_arm)
|
|
H.limbs.l_arm.sever()
|
|
H.unlock_medal("One Armed Bandit", 1) // only need to unlock here since it always checks for left arm first and generally there's no other way to lose limbs in hell
|
|
else if(H.limbs.l_leg)
|
|
H.limbs.l_leg.sever()
|
|
else if(H.limbs.r_leg)
|
|
H.limbs.r_leg.sever()
|
|
else if(H.limbs.r_arm)
|
|
H.limbs.r_arm.sever()
|
|
else
|
|
for(var/mob/O in hearers(src, null))
|
|
O.show_message(text("<span style='color:#888888'><b>[]</b> says, 'No luck!'</span>", src), 1)
|
|
src.working = 0
|
|
src.icon_state = "slots-off"
|
|
updateUsrDialog()
|
|
src.add_fingerprint(usr)
|
|
src.updateUsrDialog()
|
|
if(mechanics) mechanics.fireOutgoing(mechanics.newSignal("machineUsed"))
|
|
return
|