//The advanced pea-green monochrome lcd of tomorrow. var/global/list/obj/item/device/pda/PDAs = list() /obj/item/device/pda name = "PDA" desc = "A portable microcomputer by Thinktronic Systems, LTD. Functionality determined by a preprogrammed ROM cartridge." icon = 'icons/obj/pda.dmi' icon_state = "pda" item_state = "electronic" w_class = 1.0 flags = FPRINT | TABLEPASS slot_flags = SLOT_ID | SLOT_BELT //Main variables var/owner = null var/default_cartridge = 0 // Access level defined by cartridge var/obj/item/weapon/cartridge/cartridge = null //current cartridge var/mode = 0 //Controls what menu the PDA will display. 0 is hub; the rest are either built in or based on cartridge. //Secondary variables var/scanmode = 0 //1 is medical scanner, 2 is forensics, 3 is reagent scanner. var/fon = 0 //Is the flashlight function on? var/f_lum = 2 //Luminosity for the flashlight function var/silent = 0 //To beep or not to beep, that is the question var/toff = 0 //If 1, messenger disabled var/tnote = null //Current Texts var/last_text //No text spamming var/last_honk //Also no honk spamming that's bad too var/ttone = "beep" //The ringtone! var/lock_code = "" // Lockcode to unlock uplink var/honkamt = 0 //How many honks left when infected with honk.exe var/mimeamt = 0 //How many silence left when infected with mime.exe var/note = "Congratulations, your station has chosen the Thinktronic 5230 Personal Data Assistant!" //Current note in the notepad function var/notehtml = "" var/cart = "" //A place to stick cartridge menu information var/detonate = 1 // Can the PDA be blown up? var/hidden = 0 // Is the PDA hidden from the PDA list? var/obj/item/weapon/card/id/id = null //Making it possible to slot an ID card into the PDA so it can function as both. var/ownjob = null //related to above var/obj/item/device/paicard/pai = null // A slot for a personal AI device /obj/item/device/pda/medical default_cartridge = /obj/item/weapon/cartridge/medical icon_state = "pda-m" /obj/item/device/pda/viro default_cartridge = /obj/item/weapon/cartridge/medical icon_state = "pda-v" /obj/item/device/pda/engineering default_cartridge = /obj/item/weapon/cartridge/engineering icon_state = "pda-e" /obj/item/device/pda/security default_cartridge = /obj/item/weapon/cartridge/security icon_state = "pda-s" /obj/item/device/pda/detective default_cartridge = /obj/item/weapon/cartridge/detective icon_state = "pda-det" /obj/item/device/pda/warden default_cartridge = /obj/item/weapon/cartridge/security icon_state = "pda-warden" /obj/item/device/pda/janitor default_cartridge = /obj/item/weapon/cartridge/janitor icon_state = "pda-j" ttone = "slip" /obj/item/device/pda/toxins default_cartridge = /obj/item/weapon/cartridge/signal/toxins icon_state = "pda-tox" ttone = "boom" /obj/item/device/pda/clown default_cartridge = /obj/item/weapon/cartridge/clown icon_state = "pda-clown" desc = "A portable microcomputer by Thinktronic Systems, LTD. The surface is coated with polytetrafluoroethylene and banana drippings." ttone = "honk" /obj/item/device/pda/mime default_cartridge = /obj/item/weapon/cartridge/mime icon_state = "pda-mime" silent = 1 ttone = "silence" /obj/item/device/pda/heads default_cartridge = /obj/item/weapon/cartridge/head icon_state = "pda-h" /obj/item/device/pda/heads/hop default_cartridge = /obj/item/weapon/cartridge/hop icon_state = "pda-hop" /obj/item/device/pda/heads/hos default_cartridge = /obj/item/weapon/cartridge/hos icon_state = "pda-hos" /obj/item/device/pda/heads/ce default_cartridge = /obj/item/weapon/cartridge/ce icon_state = "pda-ce" /obj/item/device/pda/heads/cmo default_cartridge = /obj/item/weapon/cartridge/cmo icon_state = "pda-cmo" /obj/item/device/pda/heads/rd default_cartridge = /obj/item/weapon/cartridge/rd icon_state = "pda-rd" /obj/item/device/pda/captain default_cartridge = /obj/item/weapon/cartridge/captain icon_state = "pda-c" detonate = 0 //toff = 1 /obj/item/device/pda/cargo default_cartridge = /obj/item/weapon/cartridge/quartermaster icon_state = "pda-cargo" /obj/item/device/pda/quartermaster default_cartridge = /obj/item/weapon/cartridge/quartermaster icon_state = "pda-q" /obj/item/device/pda/shaftminer icon_state = "pda-miner" /obj/item/device/pda/syndicate default_cartridge = /obj/item/weapon/cartridge/syndicate icon_state = "pda-syn" name = "Military PDA" owner = "John Doe" hidden = 1 /obj/item/device/pda/chaplain icon_state = "pda-holy" ttone = "holy" /obj/item/device/pda/lawyer default_cartridge = /obj/item/weapon/cartridge/lawyer icon_state = "pda-lawyer" ttone = "..." /obj/item/device/pda/botanist //default_cartridge = /obj/item/weapon/cartridge/botanist icon_state = "pda-hydro" /obj/item/device/pda/roboticist icon_state = "pda-robot" /obj/item/device/pda/librarian icon_state = "pda-libb" desc = "A portable microcomputer by Thinktronic Systems, LTD. This is model is a WGW-11 series e-reader." note = "Congratulations, your station has chosen the Thinktronic 5290 WGW-11 Series E-reader and Personal Data Assistant!" silent = 1 //Quiet in the library! /obj/item/device/pda/clear icon_state = "pda-transp" desc = "A portable microcomputer by Thinktronic Systems, LTD. This is model is a special edition with a transparent case." note = "Congratulations, you have chosen the Thinktronic 5230 Personal Data Assistant Deluxe Special Max Turbo Limited Edition!" /obj/item/device/pda/chef icon_state = "pda-chef" /obj/item/device/pda/bar icon_state = "pda-bar" /obj/item/device/pda/atmos default_cartridge = /obj/item/weapon/cartridge/atmos icon_state = "pda-atmo" /obj/item/device/pda/chemist default_cartridge = /obj/item/weapon/cartridge/chemistry icon_state = "pda-chem" /obj/item/device/pda/geneticist default_cartridge = /obj/item/weapon/cartridge/medical icon_state = "pda-gene" // Special AI/pAI PDAs that cannot explode. /obj/item/device/pda/ai icon_state = "NONE" ttone = "data" detonate = 0 /obj/item/device/pda/ai/proc/set_name_and_job(newname as text, newjob as text) owner = newname ownjob = newjob name = newname + " (" + ownjob + ")" //AI verb and proc for sending PDA messages. /obj/item/device/pda/ai/verb/cmd_send_pdamesg() set category = "AI IM" set name = "Send Message" set src in usr if(usr.stat == 2) usr << "You can't send PDA messages because you are dead!" return var/list/plist = available_pdas() if (plist) var/c = input(usr, "Please select a PDA") as null|anything in sortList(plist) if (!c) // if the user hasn't selected a PDA file we can't send a message return var/selected = plist[c] create_message(usr, selected) /obj/item/device/pda/ai/verb/cmd_toggle_pda_receiver() set category = "AI IM" set name = "Toggle Sender/Receiver" set src in usr if(usr.stat == 2) usr << "You can't do that because you are dead!" return toff = !toff usr << "PDA sender/receiver toggled [(toff ? "Off" : "On")]!" /obj/item/device/pda/ai/verb/cmd_toggle_pda_silent() set category = "AI IM" set name = "Toggle Ringer" set src in usr if(usr.stat == 2) usr << "You can't do that because you are dead!" return silent=!silent usr << "PDA ringer toggled [(silent ? "Off" : "On")]!" /obj/item/device/pda/ai/verb/cmd_show_message_log() set category = "AI IM" set name = "Show Message Log" set src in usr if(usr.stat == 2) usr << "You can't do that because you are dead!" return var/HTML = "AI PDA Message Log[tnote]" usr << browse(HTML, "window=log;size=400x444;border=1;can_resize=1;can_close=1;can_minimize=0") /obj/item/device/pda/ai/can_use() return 1 /obj/item/device/pda/ai/attack_self(mob/user as mob) if ((honkamt > 0) && (prob(60)))//For clown virus. honkamt-- playsound(loc, 'sound/items/bikehorn.ogg', 30, 1) return /obj/item/device/pda/ai/pai ttone = "assist" /* * The Actual PDA */ /obj/item/device/pda/pickup(mob/user) if(fon) SetLuminosity(0) user.SetLuminosity(user.luminosity + f_lum) /obj/item/device/pda/dropped(mob/user) if(fon) user.SetLuminosity(user.luminosity - f_lum) SetLuminosity(f_lum) /obj/item/device/pda/New() ..() PDAs += src if(default_cartridge) cartridge = new default_cartridge(src) new /obj/item/weapon/pen(src) /obj/item/device/pda/proc/can_use() if(!ismob(loc)) return 0 var/mob/M = loc if(!M.canmove) return 0 if((src in M.contents) || ( istype(loc, /turf) && in_range(src, M) )) return 1 else return 0 /obj/item/device/pda/GetAccess() if(id) return id.GetAccess() else return ..() /obj/item/device/pda/GetID() return id /obj/item/device/pda/MouseDrop(obj/over_object as obj, src_location, over_location) var/mob/M = usr if((!istype(over_object, /obj/screen)) && !M.restrained() && !M.stat && can_use()) return attack_self(M) return //NOTE: graphic resources are loaded on client login /obj/item/device/pda/attack_self(mob/user as mob) user.set_machine(src) if(active_uplink_check(user)) return var/dat = "Personal Data Assistant" dat += " Close" if ((!isnull(cartridge)) && (mode == 0)) dat += " | Eject [cartridge]" if (mode) dat += " | Return" dat += " | Refresh" dat += "
" if (!owner) dat += "Warning: No owner information entered. Please swipe card.

" dat += " Retry" else switch (mode) if (0) dat += "

PERSONAL DATA ASSISTANT v.1.2

" dat += "Owner: [owner], [ownjob]
" dat += text("ID: [id ? "[id.registered_name], [id.assignment]" : "----------"]") dat += text("
[id ? "Update PDA Info" : ""]
") dat += "Station Time: [worldtime2text()]"//:[world.time / 100 % 6][world.time / 100 % 10]" dat += "

" dat += "

General Functions

" dat += "" if (cartridge.access_engine) dat += "

Engineering Functions

" dat += "" if (cartridge.access_medical) dat += "

Medical Functions

" dat += "" if (cartridge.access_security) dat += "

Security Functions

" dat += "" else dat += "" if(cartridge.access_quartermaster) dat += "

Quartermaster Functions:

" dat += "" dat += "" dat += "

Utilities

" dat += "" if (1) dat += "

Notekeeper V2.1

" dat += " Edit
" dat += note if (2) dat += "

SpaceMessenger V3.9.4

" dat += " Ringer: [silent == 1 ? "Off" : "On"] | " dat += " Send / Receive: [toff == 1 ? "Off" : "On"] | " dat += " Set Ringtone | " dat += " Messages
" if (istype(cartridge, /obj/item/weapon/cartridge/syndicate)) dat += "[cartridge:shock_charges] detonation charges left.
" if (istype(cartridge, /obj/item/weapon/cartridge/clown)) dat += "[cartridge:honk_charges] viral files left.
" if (istype(cartridge, /obj/item/weapon/cartridge/mime)) dat += "[cartridge:mime_charges] viral files left.
" dat += "

Detected PDAs

" dat += "" if (count == 0) dat += "None detected.
" if(21) dat += "

SpaceMessenger V3.9.4

" dat += " Clear Messages" dat += "

Messages

" dat += tnote dat += "
" if (3) dat += "

Atmospheric Readings

" var/turf/T = get_turf_or_move(user.loc) if (isnull(T)) dat += "Unable to obtain a reading.
" else var/datum/gas_mixture/environment = T.return_air() var/pressure = environment.return_pressure() var/total_moles = environment.total_moles() dat += "Air Pressure: [round(pressure,0.1)] kPa
" if (total_moles) var/o2_level = environment.oxygen/total_moles var/n2_level = environment.nitrogen/total_moles var/co2_level = environment.carbon_dioxide/total_moles var/plasma_level = environment.toxins/total_moles var/unknown_level = 1-(o2_level+n2_level+co2_level+plasma_level) dat += "Nitrogen: [round(n2_level*100)]%
" dat += "Oxygen: [round(o2_level*100)]%
" dat += "Carbon Dioxide: [round(co2_level*100)]%
" dat += "Plasma: [round(plasma_level*100)]%
" if(unknown_level > 0.01) dat += "OTHER: [round(unknown_level)]%
" dat += "Temperature: [round(environment.temperature-T0C)]°C
" dat += "
" if (5) dat += "

Nanotrasen Relay Chat

" dat += "

Detected Channels

:
  • " for(var/datum/chatroom/C in chatrooms) dat += "#[html_encode(lowertext(C.name))]" if(C.password != "") dat += " " dat += "
    • " if (41) //crew manifest dat += "

    Crew Manifest

    " dat += "Entries cannot be modified from this terminal.

    " if(data_core) dat += data_core.get_manifest(1) // make it monochrome dat += "
    " else//Else it links to the cart menu proc. Although, it really uses menu hub 4--menu 4 doesn't really exist as it simply redirects to hub. dat += cart dat += "" user << browse(dat, "window=pda;size=400x444;border=1;can_resize=1;can_close=0;can_minimize=0") onclose(user, "pda", src) /obj/item/device/pda/Topic(href, href_list) ..() var/mob/living/U = usr //Looking for master was kind of pointless since PDAs don't appear to have one. //if ((src in U.contents) || ( istype(loc, /turf) && in_range(src, U) ) ) if(can_use()) //Why reinvent the wheel? There's a proc that does exactly that. if ( !(U.stat || U.restrained()) ) add_fingerprint(U) U.set_machine(src) switch(href_list["choice"]) //BASIC FUNCTIONS=================================== if("Close")//Self explanatory U.unset_machine() U << browse(null, "window=pda") return if("Refresh")//Refresh, goes to the end of the proc. if("Return")//Return if(mode<=9) mode = 0 else mode = round(mode/10) if(mode==4)//Fix for cartridges. Redirects to hub. mode = 0 else if(mode >= 40 && mode <= 49)//Fix for cartridges. Redirects to refresh the menu. cartridge.mode = mode cartridge.unlock() if ("Authenticate")//Checks for ID id_check(U, 1) if("UpdateInfo") ownjob = id.assignment name = "PDA-[owner] ([ownjob])" if("Eject")//Ejects the cart, only done from hub. if (!isnull(cartridge)) var/turf/T = loc if(ismob(T)) T = T.loc cartridge.loc = T scanmode = 0 if (cartridge.radio) cartridge.radio.hostpda = null cartridge = null //MENU FUNCTIONS=================================== if("0")//Hub mode = 0 if("1")//Notes mode = 1 if("2")//Messenger mode = 2 if("21")//Read messeges mode = 21 if("3")//Atmos scan mode = 3 if("4")//Redirects to hub mode = 0 if("chatroom") // chatroom hub mode = 5 if("41") //Manifest mode = 41 //MAIN FUNCTIONS=================================== if("Light") if(fon) fon = 0 if(src in U.contents) U.SetLuminosity(U.luminosity - f_lum) else SetLuminosity(0) else fon = 1 if(src in U.contents) U.SetLuminosity(U.luminosity + f_lum) else SetLuminosity(f_lum) if("Medical Scan") if(scanmode == 1) scanmode = 0 else if((!isnull(cartridge)) && (cartridge.access_medical)) scanmode = 1 if("Reagent Scan") if(scanmode == 3) scanmode = 0 else if((!isnull(cartridge)) && (cartridge.access_reagent_scanner)) scanmode = 3 if("Halogen Counter") if(scanmode == 4) scanmode = 0 else if((!isnull(cartridge)) && (cartridge.access_engine)) scanmode = 4 if("Honk") if ( !(last_honk && world.time < last_honk + 20) ) playsound(loc, 'sound/items/bikehorn.ogg', 50, 1) last_honk = world.time if("Gas Scan") if(scanmode == 5) scanmode = 0 else if((!isnull(cartridge)) && (cartridge.access_atmos)) scanmode = 5 //MESSENGER/NOTE FUNCTIONS=================================== if ("Edit") var/n = input(U, "Please enter message", name, notehtml) as message if (in_range(src, U) && loc == U) n = copytext(adminscrub(n), 1, MAX_MESSAGE_LEN) if (mode == 1) note = replacetext(n, "\n", "
    ") notehtml = n else U << browse(null, "window=pda") return if("Toggle Messenger") toff = !toff if("Toggle Ringer")//If viewing texts then erase them, if not then toggle silent status silent = !silent if("Clear")//Clears messages tnote = null if("Ringtone") var/t = input(U, "Please enter new ringtone", name, ttone) as text if (in_range(src, U) && loc == U) if (t) if(src.hidden_uplink && hidden_uplink.check_trigger(U, lowertext(t), lowertext(lock_code))) U << "The PDA softly beeps." U << browse(null, "window=pda") else t = copytext(sanitize(t), 1, 20) ttone = t else U << browse(null, "window=pda") return if("Message") var/obj/item/device/pda/P = locate(href_list["target"]) src.create_message(U, P) if("Send Honk")//Honk virus if(istype(cartridge, /obj/item/weapon/cartridge/clown))//Cartridge checks are kind of unnecessary since everything is done through switch. var/obj/item/device/pda/P = locate(href_list["target"])//Leaving it alone in case it may do something useful, I guess. if(!isnull(P)) if (!P.toff && cartridge:honk_charges > 0) cartridge:honk_charges-- U.show_message("\blue Virus sent!", 1) P.honkamt = (rand(15,20)) else U << "PDA not found." else U << browse(null, "window=pda") return if("Send Silence")//Silent virus if(istype(cartridge, /obj/item/weapon/cartridge/mime)) var/obj/item/device/pda/P = locate(href_list["target"]) if(!isnull(P)) if (!P.toff && cartridge:mime_charges > 0) cartridge:mime_charges-- U.show_message("\blue Virus sent!", 1) P.silent = 1 P.ttone = "silence" else U << "PDA not found." else U << browse(null, "window=pda") return //SYNDICATE FUNCTIONS=================================== if("Toggle Door") if(cartridge && cartridge.access_remote_door) for(var/obj/machinery/door/poddoor/M in world) if(M.id == cartridge.remote_door_id) if(M.density) M.open() else M.close() if("Detonate")//Detonate PDA if(istype(cartridge, /obj/item/weapon/cartridge/syndicate)) var/obj/item/device/pda/P = locate(href_list["target"]) if(!isnull(P)) if (!P.toff && cartridge:shock_charges > 0) cartridge:shock_charges-- var/difficulty = 0 if(P.cartridge) difficulty += P.cartridge.access_medical difficulty += P.cartridge.access_security difficulty += P.cartridge.access_engine difficulty += P.cartridge.access_clown difficulty += P.cartridge.access_janitor else difficulty += 2 if(prob(difficulty * 12) || (P.hidden_uplink)) U.show_message("\red An error flashes on your [src].", 1) else if (prob(difficulty * 3)) U.show_message("\red Energy feeds back into your [src]!", 1) U << browse(null, "window=pda") explode() else U.show_message("\blue Success!", 1) P.explode() else U << "PDA not found." else U.unset_machine() U << browse(null, "window=pda") return //pAI FUNCTIONS=================================== if("pai") switch(href_list["option"]) if("1") // Configure pAI device pai.attack_self(U) if("2") // Eject pAI device var/turf/T = get_turf_or_move(src.loc) if(T) pai.loc = T //LINK FUNCTIONS=================================== else//Cartridge menu linking mode = text2num(href_list["choice"]) cartridge.mode = mode cartridge.unlock() else//If can't interact. U.unset_machine() U << browse(null, "window=pda") return else//If not in range or not using the pda. U.unset_machine() U << browse(null, "window=pda") return //EXTRA FUNCTIONS=================================== if (mode == 2||mode == 21)//To clear message overlays. overlays.Cut() if ((honkamt > 0) && (prob(60)))//For clown virus. honkamt-- playsound(loc, 'sound/items/bikehorn.ogg', 30, 1) if(U.machine == src && href_list["skiprefresh"]!="1")//Final safety. attack_self(U)//It auto-closes the menu prior if the user is not in range and so on. else U.unset_machine() U << browse(null, "window=pda") return /obj/item/device/pda/proc/remove_id() if (id) if (ismob(loc)) var/mob/M = loc M.put_in_hands(id) usr << "You remove the ID from the [name]." else id.loc = get_turf(src) id = null /obj/item/device/pda/proc/create_message(var/mob/living/U = usr, var/obj/item/device/pda/P) var/t = input(U, "Please enter message", name, null) as text t = copytext(sanitize(t), 1, MAX_MESSAGE_LEN) if (!t || !istype(P)) return if (!in_range(src, U) && loc != U) return if (isnull(P)||P.toff || toff) return if (last_text && world.time < last_text + 5) return if(!can_use()) return last_text = world.time // check if telecomms I/O route 1459 is stable //var/telecomms_intact = telecomms_process(P.owner, owner, t) var/obj/machinery/message_server/useMS = null if(message_servers) for (var/obj/machinery/message_server/MS in message_servers) //PDAs are now dependant on the Message Server. if(MS.active) useMS = MS break var/datum/signal/signal = src.telecomms_process() var/useTC = 0 if(signal) if(signal.data["done"]) useTC = 1 var/turf/pos = get_turf(P) if(pos.z in signal.data["level"]) useTC = 2 //Let's make this barely readable if(signal.data["compression"] > 0) t = Gibberish(t, signal.data["compression"] + 50) if(useMS && useTC) // only send the message if it's stable if(useTC != 2) // Does our recepient have a broadcaster on their level? U << "ERROR: Cannot reach recepient." return useMS.send_pda_message("[P.owner]","[owner]","[t]") tnote += "→ To [P.owner]:
    [t]
    " P.tnote += "← From     [owner] ([ownjob]):
    [t]
    " if (prob(15)) //Give the AI a chance of intercepting the message var/who = src.owner if(prob(50)) who = P:owner for(var/mob/living/silicon/ai/ai in mob_list) // Allows other AIs to intercept the message but the AI won't intercept their own message. if(ai.aiPDA != P && ai.aiPDA != src) ai.show_message("Intercepted message from [who]: [t]") if (!P.silent) playsound(P.loc, 'sound/machines/twobeep.ogg', 50, 1) for (var/mob/O in hearers(3, P.loc)) if(!P.silent) O.show_message(text("\icon[P] *[P.ttone]*")) //Search for holder of the PDA. var/mob/living/L = null if(P.loc && isliving(P.loc)) L = P.loc //Maybe they are a pAI! else L = get(P, /mob/living/silicon) if(L) L << "\icon[P] Message from [src.owner] ([ownjob]), \"[t]\" (Reply)" log_pda("[usr] (PDA: [src.name]) sent \"[t]\" to [P.name]") P.overlays.Cut() P.overlays += image('icons/obj/pda.dmi', "pda-r") else U << "ERROR: Messaging server is not responding." /obj/item/device/pda/verb/verb_remove_id() set category = "Object" set name = "Remove id" set src in usr if(issilicon(usr)) return if ( !(usr.stat || usr.restrained()) ) if(id) remove_id() else usr << "This PDA does not have an ID in it." else usr << "You cannot do this while restrained." /obj/item/device/pda/verb/verb_remove_pen() set category = "Object" set name = "Remove pen" set src in usr if(issilicon(usr)) return if ( !(usr.stat || usr.restrained()) ) var/obj/item/weapon/pen/O = locate() in src if(O) if (istype(loc, /mob)) var/mob/M = loc if(M.get_active_hand() == null) M.put_in_hands(O) usr << "You remove \the [O] from \the [src]." return O.loc = get_turf(src) else usr << "This PDA does not have a pen in it." else usr << "You cannot do this while restrained." /obj/item/device/pda/proc/id_check(mob/user as mob, choice as num)//To check for IDs; 1 for in-pda use, 2 for out of pda use. if(choice == 1) if (id) remove_id() else var/obj/item/I = user.get_active_hand() if (istype(I, /obj/item/weapon/card/id)) user.drop_item() I.loc = src id = I else var/obj/item/weapon/card/I = user.get_active_hand() if (istype(I, /obj/item/weapon/card/id) && I:registered_name) var/obj/old_id = id user.drop_item() I.loc = src id = I user.put_in_hands(old_id) return // access to status display signals /obj/item/device/pda/attackby(obj/item/C as obj, mob/user as mob) ..() if(istype(C, /obj/item/weapon/cartridge) && !cartridge) cartridge = C user.drop_item() cartridge.loc = src user << "You insert [cartridge] into [src]." if(cartridge.radio) cartridge.radio.hostpda = src else if(istype(C, /obj/item/weapon/card/id)) var/obj/item/weapon/card/id/idcard = C if(!idcard.registered_name) user << "\The [src] rejects the ID." return if(!owner) owner = idcard.registered_name ownjob = idcard.assignment name = "PDA-[owner] ([ownjob])" user << "Card scanned." else //Basic safety check. If either both objects are held by user or PDA is on ground and card is in hand. if(((src in user.contents) && (C in user.contents)) || (istype(loc, /turf) && in_range(src, user) && (C in user.contents)) ) if(!(user.stat || user.restrained()) )//If they can still act. id_check(user, 2) user << "You put the ID into \the [src]'s slot." updateSelfDialog()//Update self dialog on success. return //Return in case of failed check or when successful. updateSelfDialog()//For the non-input related code. else if(istype(C, /obj/item/device/paicard) && !src.pai) user.drop_item() C.loc = src pai = C user << "You slot \the [C] into [src]." updateUsrDialog() else if(istype(C, /obj/item/weapon/pen)) var/obj/item/weapon/pen/O = locate() in src if(O) user << "There is already a pen in \the [src]." else user.drop_item() C.loc = src user << "You slide \the [C] into \the [src]." return /obj/item/device/pda/attack(mob/living/C as mob, mob/living/user as mob) if (istype(C, /mob/living/carbon)) switch(scanmode) if(1) for (var/mob/O in viewers(C, null)) O.show_message("\red [user] has analyzed [C]'s vitals!", 1) user.show_message("\blue Analyzing Results for [C]:") user.show_message("\blue \t Overall Status: [C.stat > 1 ? "dead" : "[C.health - C.halloss]% healthy"]", 1) user.show_message("\blue \t Damage Specifics: [C.getOxyLoss() > 50 ? "\red" : "\blue"][C.getOxyLoss()]-[C.getToxLoss() > 50 ? "\red" : "\blue"][C.getToxLoss()]-[C.getFireLoss() > 50 ? "\red" : "\blue"][C.getFireLoss()]-[C.getBruteLoss() > 50 ? "\red" : "\blue"][C.getBruteLoss()]", 1) user.show_message("\blue \t Key: Suffocation/Toxin/Burns/Brute", 1) user.show_message("\blue \t Body Temperature: [C.bodytemperature-T0C]°C ([C.bodytemperature*1.8-459.67]°F)", 1) if(C.tod && (C.stat == DEAD || (C.status_flags & FAKEDEATH))) user.show_message("\blue \t Time of Death: [C.tod]") if(istype(C, /mob/living/carbon/human)) var/mob/living/carbon/human/H = C var/list/damaged = H.get_damaged_organs(1,1) user.show_message("\blue Localized Damage, Brute/Burn:",1) if(length(damaged)>0) for(var/datum/organ/external/org in damaged) user.show_message(text("\blue \t []: []\blue-[]",capitalize(org.display_name),(org.brute_dam > 0)?"\red [org.brute_dam]":0,(org.burn_dam > 0)?"\red [org.burn_dam]":0),1) else user.show_message("\blue \t Limbs are OK.",1) for(var/datum/disease/D in C.viruses) if(!D.hidden[SCANNER]) user.show_message(text("\red Warning: [D.form] Detected\nName: [D.name].\nType: [D.spread].\nStage: [D.stage]/[D.max_stages].\nPossible Cure: [D.cure]")) if(2) if (!istype(C:dna, /datum/dna)) user << "\blue No fingerprints found on [C]" else if(!istype(C, /mob/living/carbon/monkey)) if(!isnull(C:gloves)) user << "\blue No fingerprints found on [C]" else user << text("\blue [C]'s Fingerprints: [md5(C:dna.uni_identity)]") if ( !(C:blood_DNA) ) user << "\blue No blood found on [C]" if(C:blood_DNA) del(C:blood_DNA) else user << "\blue Blood found on [C]. Analysing..." spawn(15) for(var/blood in C:blood_DNA) user << "\blue Blood type: [C:blood_DNA[blood]]\nDNA: [blood]" if(4) for (var/mob/O in viewers(C, null)) O.show_message("\red [user] has analyzed [C]'s radiation levels!", 1) user.show_message("\blue Analyzing Results for [C]:") if(C.radiation) user.show_message("\green Radiation Level: \black [C.radiation]") else user.show_message("\blue No radiation detected.") /obj/item/device/pda/afterattack(atom/A as mob|obj|turf|area, mob/user as mob) switch(scanmode) if(3) if(!isnull(A.reagents)) if(A.reagents.reagent_list.len > 0) var/reagents_length = A.reagents.reagent_list.len user << "\blue [reagents_length] chemical agent[reagents_length > 1 ? "s" : ""] found." for (var/re in A.reagents.reagent_list) user << "\blue \t [re]" else user << "\blue No active chemical agents found in [A]." else user << "\blue No significant chemical agents found in [A]." if(5) if((istype(A, /obj/item/weapon/tank)) || (istype(A, /obj/machinery/portable_atmospherics))) var/obj/icon = A for (var/mob/O in viewers(user, null)) O << "\red [user] has used [src] on \icon[icon] [A]" var/pressure = A:air_contents.return_pressure() var/total_moles = A:air_contents.total_moles() user << "\blue Results of analysis of \icon[icon]" if (total_moles>0) var/o2_concentration = A:air_contents.oxygen/total_moles var/n2_concentration = A:air_contents.nitrogen/total_moles var/co2_concentration = A:air_contents.carbon_dioxide/total_moles var/plasma_concentration = A:air_contents.toxins/total_moles var/unknown_concentration = 1-(o2_concentration+n2_concentration+co2_concentration+plasma_concentration) user << "\blue Pressure: [round(pressure,0.1)] kPa" user << "\blue Nitrogen: [round(n2_concentration*100)]%" user << "\blue Oxygen: [round(o2_concentration*100)]%" user << "\blue CO2: [round(co2_concentration*100)]%" user << "\blue Plasma: [round(plasma_concentration*100)]%" if(unknown_concentration>0.01) user << "\red Unknown: [round(unknown_concentration*100)]%" user << "\blue Temperature: [round(A:air_contents.temperature-T0C)]°C" else user << "\blue Tank is empty!" if (istype(A, /obj/machinery/atmospherics/pipe/tank)) var/obj/icon = A for (var/mob/O in viewers(user, null)) O << "\red [user] has used [src] on \icon[icon] [A]" var/obj/machinery/atmospherics/pipe/tank/T = A var/pressure = T.parent.air.return_pressure() var/total_moles = T.parent.air.total_moles() user << "\blue Results of analysis of \icon[icon]" if (total_moles>0) var/o2_concentration = T.parent.air.oxygen/total_moles var/n2_concentration = T.parent.air.nitrogen/total_moles var/co2_concentration = T.parent.air.carbon_dioxide/total_moles var/plasma_concentration = T.parent.air.toxins/total_moles var/unknown_concentration = 1-(o2_concentration+n2_concentration+co2_concentration+plasma_concentration) user << "\blue Pressure: [round(pressure,0.1)] kPa" user << "\blue Nitrogen: [round(n2_concentration*100)]%" user << "\blue Oxygen: [round(o2_concentration*100)]%" user << "\blue CO2: [round(co2_concentration*100)]%" user << "\blue Plasma: [round(plasma_concentration*100)]%" if(unknown_concentration>0.01) user << "\red Unknown: [round(unknown_concentration*100)]%" user << "\blue Temperature: [round(T.parent.air.temperature-T0C)]°C" else user << "\blue Tank is empty!" if (!scanmode && istype(A, /obj/item/weapon/paper) && owner) note = A:info user << "\blue Paper scanned." //concept of scanning paper copyright brainoblivion 2009 /obj/item/device/pda/proc/explode() //This needs tuning. if(!src.detonate) return var/turf/T = get_turf(src.loc) if (ismob(loc)) var/mob/M = loc M.show_message("\red Your [src] explodes!", 1) if(T) T.hotspot_expose(700,125) explosion(T, -1, -1, 2, 3) del(src) return /obj/item/device/pda/Del() PDAs -= src if (src.id) src.id.loc = get_turf(src.loc) ..() /obj/item/device/pda/clown/HasEntered(AM as mob|obj) //Clown PDA is slippery. if (istype(AM, /mob/living/carbon)) var/mob/M = AM if ((istype(M, /mob/living/carbon/human) && (istype(M:shoes, /obj/item/clothing/shoes) && M:shoes.flags&NOSLIP)) || M.m_intent == "walk") return if ((istype(M, /mob/living/carbon/human) && (M.real_name != src.owner) && (istype(src.cartridge, /obj/item/weapon/cartridge/clown)))) if (src.cartridge:honk_charges < 5) src.cartridge:honk_charges++ M.stop_pulling() M << "\blue You slipped on the PDA!" playsound(src.loc, 'sound/misc/slip.ogg', 50, 1, -3) M.Stun(8) M.Weaken(5) /obj/item/device/pda/proc/available_pdas() var/list/names = list() var/list/plist = list() var/list/namecounts = list() if (toff) usr << "Turn on your receiver in order to send messages." return for (var/obj/item/device/pda/P in PDAs) if (!P.owner) continue else if(P.hidden) continue else if (P == src) continue else if (P.toff) continue var/name = P.owner if (name in names) namecounts[name]++ name = text("[name] ([namecounts[name]])") else names.Add(name) namecounts[name] = 1 plist[text("[name]")] = P return plist //Some spare PDAs in a box /obj/item/weapon/storage/box/PDAs name = "spare PDAs" desc = "A box of spare PDA microcomputers." icon = 'icons/obj/pda.dmi' icon_state = "pdabox" New() ..() new /obj/item/device/pda(src) new /obj/item/device/pda(src) new /obj/item/device/pda(src) new /obj/item/device/pda(src) new /obj/item/weapon/cartridge/head(src) var/newcart = pick( /obj/item/weapon/cartridge/engineering, /obj/item/weapon/cartridge/security, /obj/item/weapon/cartridge/medical, /obj/item/weapon/cartridge/signal/toxins, /obj/item/weapon/cartridge/quartermaster) new newcart(src) // Pass along the pulse to atoms in contents, largely added so pAIs are vulnerable to EMP /obj/item/device/pda/emp_act(severity) for(var/atom/A in src) A.emp_act(severity)