This commit is contained in:
MaddoScientisto 2026-03-25 23:32:36 +01:00
commit f92d1504fa
547 changed files with 37597 additions and 0 deletions

View file

@ -0,0 +1,681 @@
function textfil2_slot_20() /* entry=401 class_id=0x0A1F slot=0x20 */
{
var
referent, /* [BP+00h] type=0x69 */
linkNum, /* [BP+0Ah] type=0x69 */
msgNum, /* [BP+0Ch] type=0x69 */
passcode, /* [BP+0Eh] type=0x69 */
textFile; /* [BP-02h] type=0x73 */
entry:
if (msgNum != 110) goto block_0155;
block_00F0:
/* free_local_string bp_offset=0xFE target=[BP-02h] */
textFile = "WARNING:^The laser field has been deactivated for thirty seconds. ^*End of Message <";
goto block_260D;
block_0155:
if (msgNum != 111) goto block_0237;
block_015D:
if (linkNum && passcode) goto block_0210;
block_016E:
/* concat */
/* concat */
/* concat */
/* free_local_string bp_offset=0xFE target=[BP-02h] */
textFile = "^*End of Message <";
goto block_0234;
block_0210:
/* free_local_string bp_offset=0xFE target=[BP-02h] */
textFile = "Kimball Research Facility";
block_0234:
goto block_260D;
block_0237:
if (msgNum != 112) goto block_0339;
block_023F:
if (linkNum && passcode) goto block_0312;
block_0250:
/* concat */
/* concat */
/* concat */
/* concat */
/* free_local_string bp_offset=0xFE target=[BP-02h] */
textFile = "Priority RED alert issued. ";
goto block_0336;
block_0312:
/* free_local_string bp_offset=0xFE target=[BP-02h] */
textFile = "Kimball Research Facility";
block_0336:
goto block_260D;
block_0339:
if (msgNum != 113) goto block_03DB;
block_0341:
if (linkNum && passcode) goto block_03B4;
block_0352:
/* concat */
/* free_local_string bp_offset=0xFE target=[BP-02h] */
textFile = Item.andStatus(passcode);
goto block_03D8;
block_03B4:
/* free_local_string bp_offset=0xFE target=[BP-02h] */
textFile = "Kimball Research Facility";
block_03D8:
goto block_260D;
block_03DB:
if (msgNum != 114) goto block_0464;
block_03E3:
/* concat */
/* concat */
/* free_local_string bp_offset=0xFE target=[BP-02h] */
textFile = ".^*End of Message <";
goto block_260D;
block_0464:
if (msgNum != 115) goto block_04CD;
block_046C:
/* concat */
/* concat */
/* free_local_string bp_offset=0xFE target=[BP-02h] */
textFile = ".^**Message <";
goto block_260D;
block_04CD:
if (msgNum != 116) goto block_0596;
block_04D5:
/* concat */
/* free_local_string bp_offset=0xFE target=[BP-02h] */
textFile = Item.andStatus(passcode);
goto block_260D;
block_0596:
if ((msgNum != 116) || (msgNum != 117)) goto block_069E;
block_05A4:
if (linkNum && passcode) goto block_0676;
block_05B5:
/* concat */
/* concat */
/* concat */
/* free_local_string bp_offset=0xFE target=[BP-02h] */
textFile = ".^^J.F.S";
goto block_069B;
block_0676:
/* free_local_string bp_offset=0xFE target=[BP-02h] */
textFile = "Kimball Research Facility^";
block_069B:
goto block_260D;
block_069E:
if (msgNum != 118) goto block_06F7;
block_06A6:
/* free_local_string bp_offset=0xFE target=[BP-02h] */
textFile = "Force field^blocking access^to telepad 5 ^has been deactivated. ";
goto block_260D;
block_06F7:
if (msgNum != 119) goto block_0739;
block_06FF:
/* free_local_string bp_offset=0xFE target=[BP-02h] */
textFile = "Access to^restricted area^has been granted. ";
goto block_260D;
block_0739:
/* free_local_string bp_offset=0xFE target=[BP-02h] */
textFile = "Bad command or file name...^File is out of range.";
if (msgNum != 120) goto block_08C7;
block_077D:
if (linkNum && passcode) goto block_089F;
block_078E:
/* concat */
/* concat */
/* concat */
/* free_local_string bp_offset=0xFE target=[BP-02h] */
textFile = ".^*End of Message <";
goto block_08C4;
block_089F:
/* free_local_string bp_offset=0xFE target=[BP-02h] */
textFile = "The OWP Research Facility^";
block_08C4:
goto block_260D;
block_08C7:
if (msgNum != 121) goto block_094F;
block_08CF:
/* free_local_string bp_offset=0xFE target=[BP-02h] */
textFile = "OWP Operations:^____________________^Now interfacing with remote service droid...*^Unit ZC90201^^Now *-ONLINE-.";
goto block_260D;
block_094F:
if (msgNum != 122) goto block_09D7;
block_0957:
/* free_local_string bp_offset=0xFE target=[BP-02h] */
textFile = "OWP Operations:^____________________^Now interfacing with remote service droid...*^Unit MXZ2391^^Now *-ONLINE-.";
goto block_260D;
block_09D7:
if ((msgNum != 123) || (msgNum != 124)) goto block_0A0D;
block_09E5:
/* free_local_string bp_offset=0xFE target=[BP-02h] */
textFile = "The OWP Research Facility^";
goto block_260D;
block_0A0D:
if (msgNum != 125) goto block_0A48;
block_0A15:
/* free_local_string bp_offset=0xFE target=[BP-02h] */
textFile = "Maximum Security Systems:^*Activated.";
goto block_260D;
block_0A48:
if ((((msgNum != 126) || (msgNum != 127)) || (msgNum != 0x0080)) || (msgNum != 0x0081)) goto block_0BAF;
block_0A64:
if (linkNum && passcode) goto block_0B87;
block_0A75:
/* concat */
/* concat */
/* concat */
/* free_local_string bp_offset=0xFE target=[BP-02h] */
textFile = ".*End of Message <";
goto block_0BAC;
block_0B87:
/* free_local_string bp_offset=0xFE target=[BP-02h] */
textFile = "The OWP Research Facility^";
block_0BAC:
goto block_260D;
block_0BAF:
if (msgNum != 0x0082) goto block_0BE7;
block_0BB8:
/* free_local_string bp_offset=0xFE target=[BP-02h] */
textFile = "Draygan Correctional Institution^";
goto block_260D;
block_0BE7:
if (msgNum != 0x0083) goto block_0C13;
block_0BF0:
/* free_local_string bp_offset=0xFE target=[BP-02h] */
textFile = "Surveillance Central^";
goto block_260D;
block_0C13:
if (msgNum != 0x0084) goto block_0C5C;
block_0C1C:
/* free_local_string bp_offset=0xFE target=[BP-02h] */
textFile = "Maximum Security Surveillance Tower^Open Access";
goto block_260D;
block_0C5C:
if (msgNum != 0x0085) goto block_0C93;
block_0C65:
/* free_local_string bp_offset=0xFE target=[BP-02h] */
textFile = "Enforcer Barracks^Open Access";
goto block_260D;
block_0C93:
if (msgNum != 0x0086) goto block_0CEE;
block_0C9C:
/* free_local_string bp_offset=0xFE target=[BP-02h] */
textFile = "Draygan Correctional Institution^Maximum Security Cell: 1^*Secure";
goto block_260D;
block_0CEE:
if (msgNum != 0x0087) goto block_0D17;
block_0CF7:
/* free_local_string bp_offset=0xFE target=[BP-02h] */
textFile = "Lift: *^ACTIVATED^";
goto block_260D;
block_0D17:
if (msgNum != 0x0088) goto block_0D46;
block_0D20:
/* free_local_string bp_offset=0xFE target=[BP-02h] */
textFile = "Force Wall De-activated^";
goto block_260D;
block_0D46:
if (msgNum != 0x0089) goto block_0DAF;
block_0D4F:
/* free_local_string bp_offset=0xFE target=[BP-02h] */
textFile = "Draygan Correctional Institution^Maximum Security Cell: 1^*Security deactivated";
goto block_260D;
block_0DAF:
if (msgNum != 0x008A) goto block_0DFA;
block_0DB8:
/* free_local_string bp_offset=0xFE target=[BP-02h] */
textFile = "Receiving WEC transmision^Establishing vid-link**";
goto block_260D;
block_0DFA:
if (msgNum != 0x008B) goto block_0E32;
block_0E03:
/* free_local_string bp_offset=0xFE target=[BP-02h] */
textFile = "Draygan Correctional Institution^";
goto block_260D;
block_0E32:
if (msgNum != 0x008C) goto block_0E81;
block_0E3B:
/* free_local_string bp_offset=0xFE target=[BP-02h] */
textFile = "Door is now ajar.^ Have a nice day.^*End of Message <";
goto block_260D;
block_0E81:
if (msgNum != 0x008D) goto block_0F1C;
block_0E8A:
/* free_local_string bp_offset=0xFE target=[BP-02h] */
textFile = "Welcome to:^ The Asylum BBS^^ ///^ o o^ --m--U--m--^ |Your Sysop:|^ | E--- |^ ----------- ^ / &^ ~ ~^";
goto block_260D;
block_0F1C:
if (msgNum != 0x008E) goto block_0F5E;
block_0F25:
/* free_local_string bp_offset=0xFE target=[BP-02h] */
textFile = "The power to the electric walls is now off.";
goto block_260D;
block_0F5E:
if (msgNum != 0x008F) goto block_0F91;
block_0F67:
/* free_local_string bp_offset=0xFE target=[BP-02h] */
textFile = "Electric walls re-activated.";
goto block_260D;
block_0F91:
if (msgNum != 0x0090) goto block_1021;
block_0F9A:
/* concat */
/* concat */
/* free_local_string bp_offset=0xFE target=[BP-02h] */
textFile = ".^*End of Message <";
goto block_260D;
block_1021:
if (msgNum != 0x0091) goto block_10E6;
block_102A:
/* concat */
/* concat */
/* concat */
/* free_local_string bp_offset=0xFE target=[BP-02h] */
textFile = "^*End of Message <";
goto block_260D;
block_10E6:
if (msgNum != 0x0092) goto block_1196;
block_10EF:
/* concat */
/* concat */
/* free_local_string bp_offset=0xFE target=[BP-02h] */
textFile = ".^*End of Message <";
goto block_260D;
block_1196:
if (msgNum != 0x0093) goto block_1210;
block_119F:
/* free_local_string bp_offset=0xFE target=[BP-02h] */
textFile = "WARNING:^Computer Security Failure.^Alerting all guards and security systems.^^*End of Message <";
goto block_260D;
block_1210:
if (msgNum != 0x0095) goto block_1289;
block_1219:
/* concat */
/* concat */
/* free_local_string bp_offset=0xFE target=[BP-02h] */
textFile = ".^*End of Message <";
goto block_260D;
block_1289:
if (msgNum != 0x0094) goto block_12C7;
block_1292:
/* free_local_string bp_offset=0xFE target=[BP-02h] */
textFile = "Welcome to Hell.^Here comes the Cheese!";
goto block_260D;
block_12C7:
if (msgNum != 0x0096) goto block_13AB;
block_12D0:
/* concat */
/* concat */
/* concat */
/* free_local_string bp_offset=0xFE target=[BP-02h] */
textFile = "disloyal workers from gaining weapons! ^<EOM>";
goto block_260D;
block_13AB:
if (msgNum != 0x0097) goto block_148C;
block_13B4:
/* concat */
/* concat */
/* concat */
/* free_local_string bp_offset=0xFE target=[BP-02h] */
textFile = "possible assassins from gaining access!";
goto block_260D;
block_148C:
if (msgNum != 0x0098) goto block_151C;
block_1495:
/* free_local_string bp_offset=0xFE target=[BP-02h] */
textFile = "Security Cartel ^Droid Manual Overide:*^Networking to *<XHT1138>*Overide of servomech confirmed...^*^*Happy Hunting...";
goto block_260D;
block_151C:
if (msgNum != 0x0099) goto block_15F0;
block_1525:
/* free_local_string bp_offset=0xFE target=[BP-02h] */
textFile = "Security Cartel Network Base:^^Alpha Alarm Overide...Alarms triggered in this area were a result of a substandard networking interface.^Area is secured. No threats or breaches reported.*";
goto block_260D;
block_15F0:
if (msgNum != 0x009A) goto block_16B3;
block_15F9:
/* free_local_string bp_offset=0xFE target=[BP-02h] */
textFile = "Though there is no need for panic, everyone must head for the nearest life pod by which to evacuate the space station.^Obey WEC protocol. Congressmen and Senators first!";
goto block_260D;
block_16B3:
if (msgNum != 0x009B) goto block_1777;
block_16BC:
/* free_local_string bp_offset=0xFE target=[BP-02h] */
textFile = "Security Cartel: ^Auxiliary Command Terminal.^Force field control system.^Field will remain intact, unless auxiliary code is *NOT re-entered via Primary Command terminal.";
goto block_260D;
block_1777:
if (msgNum != 0x009C) goto block_181F;
block_1780:
/* free_local_string bp_offset=0xFE target=[BP-02h] */
textFile = "Command Terminal:^Due to Security Level Alpha ^the engineering defenses are now active.^*For safety, keep a 10 meter distance from blast area.";
goto block_260D;
block_181F:
if (msgNum != 0x009D) goto block_189D;
block_1828:
/* free_local_string bp_offset=0xFE target=[BP-02h] */
textFile = "^Auxiliary Command Terminal.^*Netlink connected to barracks 1029-B.^*Accessing connecting passage...";
goto block_260D;
block_189D:
if (msgNum != 0x009E) goto block_1937;
block_18A6:
/* free_local_string bp_offset=0xFE target=[BP-02h] */
textFile = "^Auxiliary Command Terminal.^*Netlink connected to Engineering Nine.^*Passcode: 512-555-2788...^*Accessing connecting passage...";
goto block_260D;
block_1937:
if (msgNum != 0x009F) goto block_19DA;
block_1940:
/* free_local_string bp_offset=0xFE target=[BP-02h] */
textFile = "^Auxiliary Command Terminal:^Due to high levels of radioactive output, excessive durations within the containment room are not advisable.";
goto block_260D;
block_19DA:
if (msgNum != 0x00A0) goto block_1A4B;
block_19E3:
/* free_local_string bp_offset=0xFE target=[BP-02h] */
textFile = "WEC SECURITY SYSTEM:^Alternate^Security^System^^Remote Vetron:*.*.*. ALL SYSTEMS ACTIVE";
goto block_260D;
block_1A4B:
if (msgNum != 0x00A1) goto block_1B7E;
block_1A54:
if (linkNum && passcode) goto block_1B2D;
block_1A65:
/* concat */
/* concat */
/* concat */
/* concat */
/* free_local_string bp_offset=0xFE target=[BP-02h] */
textFile = "Remember, keep it to yourself!";
goto block_1B7B;
block_1B2D:
/* free_local_string bp_offset=0xFE target=[BP-02h] */
textFile = "WEC SECURITY SYSTEM:^^Remote Camera: ACTIVE*^Incubation Room #3A";
block_1B7B:
goto block_260D;
block_1B7E:
if (msgNum != 0x00A2) goto block_1CD0;
block_1B87:
if (linkNum && passcode) goto block_1C7F;
block_1B98:
/* concat */
/* concat */
/* concat */
/* concat */
/* free_local_string bp_offset=0xFE target=[BP-02h] */
textFile = "Norma";
goto block_1CCD;
block_1C7F:
/* free_local_string bp_offset=0xFE target=[BP-02h] */
textFile = "WEC SECURITY SYSTEM:^^Remote Camera: ACTIVE*^Incubation Room #4A";
block_1CCD:
goto block_260D;
block_1CD0:
if (msgNum != 0x00A3) goto block_1D32;
block_1CD9:
/* free_local_string bp_offset=0xFE target=[BP-02h] */
textFile = "WEC SECURITY SYSTEM:^^Remote Camera: ACTIVE*^BioWaste Reclamation Center";
goto block_260D;
block_1D32:
if (msgNum != 0x00A4) goto block_1E4C;
block_1D3B:
/* concat */
/* concat */
/* free_local_string bp_offset=0xFE target=[BP-02h] */
textFile = ".";
goto block_260D;
block_1E4C:
if (msgNum != 0x00A5) goto block_1EE0;
block_1E55:
/* free_local_string bp_offset=0xFE target=[BP-02h] */
textFile = "Audrey, Please come to my private chamber. I've got a new, larger specimen to show you. You will be most pleased! - Greggy";
goto block_260D;
block_1EE0:
if (msgNum != 0x00A6) goto block_1F59;
block_1EE9:
/* free_local_string bp_offset=0xFE target=[BP-02h] */
textFile = "Accessing Security Com 2341 ^*Please Wait ^Security Shields Down ^*Chrysalis Chambers Now Open ";
goto block_260D;
block_1F59:
if (msgNum != 0x00A7) goto block_1FE4;
block_1F62:
/* free_local_string bp_offset=0xFE target=[BP-02h] */
textFile = "From: M. Galway^To: R. Renteria^You're not cool enough to to have Sonex panels. Return them immediately! Or else!";
goto block_260D;
block_1FE4:
if (msgNum != 0x00AA) goto block_2058;
block_1FED:
/* free_local_string bp_offset=0xFE target=[BP-02h] */
textFile = "From: DSNELL^______________^*You're Fired!^*^*^Turn in your badge and collect your things!";
goto block_260D;
block_2058:
if (msgNum != 0x00AB) goto block_2136;
block_2061:
/* free_local_string bp_offset=0xFE target=[BP-02h] */
textFile = "Security Cartel:^______________^Due to a possible infiltrator in the refinery, Alpha level will remain in effect.All high clearance areas will only be accessible via the network. ^<End of Message>";
goto block_260D;
block_2136:
if (msgNum != 0x00AC) goto block_221F;
block_213F:
/* concat */
/* concat */
/* concat */
/* free_local_string bp_offset=0xFE target=[BP-02h] */
textFile = "^It would serve them right if the rebels got in here...";
goto block_260D;
block_221F:
if (msgNum != 0x00AD) goto block_22D2;
block_2228:
/* free_local_string bp_offset=0xFE target=[BP-02h] */
textFile = "WEC Central Co*mma*@^#$%.*.*.*^^RESISTNET: *^Welcome, Rebel...^We have hidden some items for you in the safe.^Keep up the good work...^ The Designers";
goto block_260D;
block_22D2:
if (msgNum != 0x00AE) goto block_236B;
block_22DB:
/* free_local_string bp_offset=0xFE target=[BP-02h] */
textFile = "Refinery Operations:^____________________^Now interfacing with remote service droid...*^<Roaming Susan>^^Unit is now *-ONLINE-.";
goto block_260D;
block_236B:
if (msgNum != 0x00AF) goto block_23CD;
block_2374:
/* free_local_string bp_offset=0xFE target=[BP-02h] */
textFile = "Security Operations:^____________________^Lithium Power Core*^Level Nine";
goto block_260D;
block_23CD:
if (msgNum != 0x00B0) goto block_2439;
block_23D6:
/* free_local_string bp_offset=0xFE target=[BP-02h] */
textFile = "SATELLITE TARGETING:^____________________<SATARG>*^^Weapons Operations^Level Seven";
goto block_260D;
block_2439:
if (msgNum != 0x00B4) goto block_2492;
block_2442:
/* free_local_string bp_offset=0xFE target=[BP-02h] */
textFile = "Security Cartel:^________________^*Production Line^*<ACTIVATED>";
goto block_260D;
block_2492:
if (msgNum != 0x00B6) goto block_24FB;
block_249B:
/* free_local_string bp_offset=0xFE target=[BP-02h] */
textFile = "Security Cartel:^________________^*Production Line Force Barrier^*<DEACTIVATED>";
goto block_260D;
block_24FB:
if (msgNum != 0x00BE) goto block_258B;
block_2504:
/* free_local_string bp_offset=0xFE target=[BP-02h] */
textFile = "NOTICE:^The impassable laser field has been activated. The laser fields must be reactivated after use.^*End of Message";
goto block_260D;
block_258B:
if (msgNum != 0x00E2) goto block_25D1;
block_2594:
/* free_local_string bp_offset=0xFE target=[BP-02h] */
textFile = "WEC SECURITY SYSTEM:^^Remote Camera: ACTIVE*";
goto block_260D;
block_25D1:
/* free_local_string bp_offset=0xFE target=[BP-02h] */
textFile = "Bad command or file name...^File is out of range.";
block_260D:
/* strcmp */
if "" goto block_2659;
block_261D:
/* free_local_string bp_offset=0xFE target=[BP-02h] */
textFile = "Bad command or file name...^File is out of range.";
block_2659:
goto block_2662;
block_2662:
/* free_local_string bp_offset=0xFE target=[BP-02h] */
return;
}