/* Generated with C2C (Cedar To C)*/
/* Copyright (C) 1992 by Xerox Corporation.  All rights reserved. */
/* time: August 31, 1992 8:43:43 pm PDT */
/* C2C version: October 16, 1990 (native) */
/* ref-counting: off */
/* file: XTSetterImpl, module: XTSetterImpl */ 
/* switches: bcfhklnouw */ 
#include <cedar/InstallationSupport.h>
#include <cedar/CedarExtra.h>
static char versionStamp[] = "@(#)mob←version [866326193,1324582134] XTSetterImpl";
typedef unsigned word, *ptr;
typedef unsigned char byte, *bPt;
typedef unsigned short half, *hPt;
typedef word (*fPt)();
typedef struct {word f0, f1, f2, f3, f4, f5, f6, f7;} W8;
typedef struct {word f0, f1;} W2;
typedef struct {word f0, f1, f2, f3, f4, f5, f6;} W7;
typedef struct {word f0, f1, f2;} W3;
typedef struct {word f0, f1, f2, f3;} W4;
typedef W3 *W3Pt;
typedef struct {W8 f; W8 r;} W16;
typedef struct {word f0, f1, f2, f3, f4, f5;} W6;
typedef struct {W8 f; W6 r;} W14;
typedef struct {W16 f; W14 r;} W30;
typedef struct {W8 f; W4 r;} W12;
typedef struct {W16 f; W12 r;} W28;
typedef struct {W8 f; W2 r;} W10;
typedef struct {W16 f; W10 r;} W26;
typedef W26 *W26Pt;
typedef W28 *W28Pt;
typedef struct {word f0, f1, f2, f3, f4;} W5;
typedef struct {W8 f; W5 r;} W13;
typedef struct {W16 f; W13 r;} W29;
typedef struct {W8 f; W3 r;} W11;
typedef struct {W16 f; W11 r;} W27;
typedef W27 *W27Pt;
typedef struct {W16 f; W16 r;} W32;
typedef struct {W32 f; W3 r;} W35;
typedef W12 *W12Pt;
typedef struct {W8 f; word r;} W9;
typedef struct {W16 f; W3 r;} W19;
typedef W4 *W4Pt;
typedef struct {W32 f; W32 r;} W64;
typedef struct {W32 f; W6 r;} W38;
typedef struct {W64 f; W38 r;} W102;
typedef struct {W64 f; W26 r;} W90;
typedef W90 *W90Pt;
typedef W5 *W5Pt;
typedef struct {unsigned f:1, u2:7;} * P1x0b;
typedef W2 *W2Pt;
#define SOURCE(p, l) /* source p, l */
#define BCK(idx, lim) ( ((unsigned) idx) >= ((unsigned) lim) ? (XR←RaiseBoundsFault()) : (idx) )
#define IOP2(op, x, y)  ( (word) ((x) op (y)) )
static float fc220 = 1.0;
#define SGNCK(i) ((int) (word) (i) < 0 ? XR←RaiseArithmeticFault(): i )
static float fc234 = 0.0;
static float fc282 = 100.0;
#define MIN(cast, x, y)  ( ( cast x) < ( cast y) ? (x) : (y) )
#define MAX(cast, x, y)  ( ( cast x) > ( cast y) ? (x) : (y) )
static void NoName←Q5892();
static void XTSetterImpl←P0();
static word GetTool←P60();
static word LookUpTool←P3360();
static word NewTool←P120();
static word NoName←Q5952();
static void CreateViewer←P180();
static void AddMenuEntry←P3420();
static word GetLabel←P240();
static void DestroyTool←P300();
static word NoName←Q6012();
static void NewButton←P360();
static word NoName←Q6072();
static void LeftScreenButton←P420();
static void ScreenButton←P480();
static void RightScreenButton←P540();
static void ColorScreenButton←P600();
static void PrintButton←P660();
static word NoName←Q6132();
static word FileNameSelected←P3528();
static word FileFromHint←P3588();
static word NoName←Q6192();
static void InvalidFile←P3648();
static void OptionsButton←P720();
static void ServerStatusButton←P780();
static void CreateBoolButton←P840();
static void ClickBoolButton←P900();
static word GetBoolButton←P960();
static void SetBoolButton←P1020();
static void CreateIntButton←P1080();
static word GetIntButton←P1140();
static word NoName←Q6252();
static void SetIntButton←P1200();
static void ClickIntButton←P1260();
static void CreateRealButton←P1320();
static word GetRealButton←P1380();
static word NoName←Q6312();
static void SetRealButton←P1440();
static void ClickRealButton←P1500();
static void CreateRopeButton←P1560();
static word GetRopeButton←P1620();
static void SetRopeButton←P1680();
static void ClickRopeButton←P1740();
static word NextName←P3804();
static void ClickCompress←P1800();
static void CreateOptionsViewer←P1860();
static word NoName←Q6372();
static void DestroyOptionsViewer←P1920();
static word NoName←Q6432();
static word GetOptions←P1980();
static word NoName←Q6492();
static word GetOptionsInternal←P2040();
static void SetOptions←P2100();
static word NoName←Q6552();
static word NoName←Q6612();
static word DefaultOptions←P2160();
static void DefaultOptionsFromProfile←P2220();
static word EachTool←P4008();
static void CreateServerStatusViewer←P2280();
static word NoName←Q6672();
static word NewNamedLabel←P4116();
static void DestroyServerStatusViewer←P2340();
static word NoName←Q6732();
static void ServerStatusWatcher←P2400();
static word NoName←Q6792();
static void SetServerStatusTimer←P4176();
static word NoName←Q6852();
static void WaitServerStatusTimer←P4236();
static word NoName←Q6912();
static void Report←P4296();
static word CreateStatusReport←P2460();
static word NoName←Q6972();
static void ResizeStatusContainer←P2520();
static void Resize←P4500();
static void StopButtonProc←P2580();
static void SetSendingStatus←P2640();
static void PrintStatusUpdate←P2700();
static void PlaceChild←P2760();
static word XTSViewerAdjust←P2820();
static word RedisplayTool←P2880();
static void DoIt←P5136();
static void SetupPrinterVersion←P3000();
static void DefinePrinterVersions←P3060();
static void XTSetterCommand←P3120();
static word NoName←Q7032();
static word NoName←Q7092();
static void NewProfile←P3180();
static void NewUser←P3240();
static void Init←P3300();
static void Define←P5340();
static void NoName←Q7152();
static void NoName←Q7212();
static void NoName←Q7272();
static void NoName←Q7332();
static void NoName←Q7392();
static void NoName←Q7452();
static void NoName←Q7512();
static void NoName←Q7572();
static void NoName←Q7632();
static void NoName←Q7692();
static void NoName←Q7752();
static void NoName←Q7812();
static void NoName←Q7872();
static void NoName←Q7932();
static void NoName←Q7992();
static void NoName←Q8052();
static void NoName←Q8112();
static void NoName←Q8172();
static void NoName←Q8232();
static void NoName←Q8292();
static word NoName←Q8352();
static struct {unsigned f; char r[16];} string1 = {851984, "\257\300\307\354\363\163\300\374\037\154\341\100\200\000\000"};
static struct {unsigned f; char r[68];} string2 = {4390979, "\006\031\020\001\024\001\030\001\044\001\050\001\054\001\060\001\064\001\070\001\074\001\100\100\001\100\104\001\100\110\001\100\114\001\100\120\001\100\124\001\100\130\001\100\134\001\100\140\001\100\144\001\100\150\001\100\154\001\100\160\001\100\214\001\100\220\001"};
static struct {unsigned f; char r[48];} string3 = {2883632, "\260\006\005\146\151\162\163\164\216\257\300\363\223\326\161\300\017\164\046\072\104\350\005\004\162\145\163\164\214\216\257\300\363\223\326\161\300\017\164\046\072\104\350\261\000\000\000"};
static struct {unsigned f; char r[4];} string4 = {131074, "\004\003\000"};
static struct {unsigned f; char r[16];} string5 = {917520, "\216\257\300\363\223\326\161\300\017\164\046\072\104\350\000"};
static struct {unsigned f; char r[4];} string6 = {65537, "\001\000\000"};
static struct {unsigned f; char r[16];} string7 = {851984, "\257\300\113\175\243\331\300\252\247\212\133\100\200\000\000"};
static struct {unsigned f; char r[12];} string8 = {720907, "\006\004\000\0018\001<\001@L\001"};
static struct {unsigned f; char r[16];} string9 = {851984, "\257\300\307\354\363\163\300\374\037\154\341\100\164\000\000"};
static struct {unsigned f; char r[16];} string10 = {851984, "\257\300\063\243\026\261\300\116\363\204\366\106\024\000\000"};
static struct {unsigned f; char r[4];} string11 = {131074, "\004\021\000"};
static struct {unsigned f; char r[16];} string12 = {851984, "\257\300\063\243\026\261\300\116\363\204\366\102\344\000\000"};
static struct {unsigned f; char r[16];} string13 = {851984, "\257\300\307\354\363\163\300\374\037\154\341\100\324\000\000"};
static struct {unsigned f; char r[4];} string14 = {131074, "\004?\000"};
static struct {unsigned f; char r[16];} string15 = {851984, "\257\300\250\170\135\274\300\073\343\245\166\100\200\000\000"};
static struct {unsigned f; char r[4];} string16 = {196611, "\004FH"};
static struct {unsigned f; char r[16];} string17 = {851984, "\257\300\307\354\363\163\300\374\037\154\341\100\274\000\000"};
static struct {unsigned f; char r[4];} string18 = {131074, "\004\007\000"};
static struct {unsigned f; char r[16];} string19 = {851984, "\257\300\307\354\363\163\300\374\037\154\341\100\260\000\000"};
static struct {unsigned f; char r[4];} string20 = {131074, "\004\005\000"};
static struct {unsigned f; char r[16];} string21 = {851984, "\257\300\307\354\363\163\300\374\037\154\341\100\244\000\000"};
static struct {unsigned f; char r[16];} string22 = {851984, "\257\300\307\354\363\163\300\374\037\154\341\100\230\000\000"};
static struct {unsigned f; char r[4];} string23 = {131076, "\216\251\000"};
static struct {unsigned f; char r[12];} string24 = {524300, "XTSetter\000\000\000"};
static struct {unsigned f; char r[36];} string25 = {2097188, "Connection with %g established.\012\000\000\000"};
static struct {unsigned f; char r[4];} string26 = {196612, "New"};
static struct {unsigned f; char r[4];} string27 = {196612, "<--"};
static struct {unsigned f; char r[8];} string28 = {393224, "Screen\000"};
static struct {unsigned f; char r[4];} string29 = {196612, "-->"};
static struct {unsigned f; char r[8];} string30 = {327688, "Color\000\000"};
static struct {unsigned f; char r[8];} string31 = {327688, "Print\000\000"};
static struct {unsigned f; char r[8];} string32 = {458760, "Options"};
static struct {unsigned f; char r[16];} string33 = {786448, "ServerStatus\000\000\000"};
static struct {unsigned f; char r[4];} string34 = {65540, ":\000\000"};
static struct {unsigned f; char r[44];} string35 = {2752556, "Color display is off! Nothing to print...\012\000"};
static struct {unsigned f; char r[40];} string36 = {2359336, "Nothing to print has been selected!\012\000\000\000"};
static struct {unsigned f; char r[4];} string37 = {131076, " \011\000"};
static struct {unsigned f; char r[4];} string38 = {65540, " \000\000"};
static struct {unsigned f; char r[12];} string39 = {720908, "Dummy.dummy"};
static struct {unsigned f; char r[16];} string40 = {983056, "File error: %g\012"};
static struct {unsigned f; char r[40];} string41 = {2359336, "Unable to connect to printer %g: %g\012\000\000\000"};
static struct {unsigned f; char r[16];} string42 = {786448, "WhiteOnBlack\000\000\000"};
static struct {unsigned f; char r[12];} string43 = {720908, "BlackOnGrey"};
static struct {unsigned f; char r[16];} string44 = {786448, "BlackOnWhite\000\000\000"};
static struct {unsigned f; char r[20];} string45 = {1048596, "Usage: XTSetter \000\000\000"};
static struct {unsigned f; char r[124];} string46 = {7864444, "[<serviceName>]\012Create a viewer to print things on an XNS based printer.\012Arguments:\012\011<serviceName> Print on that service\000\000\000"};
static struct {unsigned f; char r[8];} string47 = {327688, "Quoth\000\000"};
static struct {unsigned f; char r[12];} string48 = {524300, "Compress\000\000\000"};
static struct {unsigned f; char r[8];} string49 = {393224, "KeepIP\000"};
static struct {unsigned f; char r[8];} string50 = {393224, "Scale:\000"};
static struct {unsigned f; char r[8];} string51 = {393224, "Style:\000"};
static struct {unsigned f; char r[8];} string52 = {393224, "Staple\000"};
static struct {unsigned f; char r[8];} string53 = {458760, "2-sided"};
static struct {unsigned f; char r[8];} string54 = {458760, "Copies:"};
static struct {unsigned f; char r[8];} string55 = {327688, "Page:\000\000"};
static struct {unsigned f; char r[4];} string56 = {196612, "To:"};
static struct {unsigned f; char r[8];} string57 = {393224, "Paper:\000"};
static struct {unsigned f; char r[8];} string58 = {458760, "Device:"};
static struct {unsigned f; char r[8];} string59 = {327688, "Quill\000\000"};
static struct {unsigned f; char r[12];} string60 = {720908, "TimsPrinter"};
static struct {unsigned f; char r[16];} string61 = {983056, "XTSetter.KeepIP"};
static struct {unsigned f; char r[16];} string62 = {917520, "XTSetter.Style\000"};
static struct {unsigned f; char r[16];} string63 = {983056, "XTSetter.Device"};
static struct {unsigned f; char r[24];} string64 = {1441816, "XTSetter.UsePressFonts\000"};
static struct {unsigned f; char r[8];} string65 = {327688, "press\000\000"};
static struct {unsigned f; char r[20];} string66 = {1179668, "XTSetter.StyleList\000"};
static struct {unsigned f; char r[12];} string67 = {655372, "33UpLabels\000"};
static struct {unsigned f; char r[12];} string68 = {524300, "CedarACM\000\000\000"};
static struct {unsigned f; char r[16];} string69 = {786448, "BlueAndWhite\000\000\000"};
static struct {unsigned f; char r[16];} string70 = {851984, "AnacapaSlides\000\000"};
static struct {unsigned f; char r[16];} string71 = {786448, "AnacapaCedar\000\000\000"};
static struct {unsigned f; char r[16];} string72 = {917520, "TwoColumnCedar\000"};
static struct {unsigned f; char r[24];} string73 = {1507352, "TwoColumnLandscapeCedar"};
static struct {unsigned f; char r[8];} string74 = {393224, "Slides\000"};
static struct {unsigned f; char r[20];} string75 = {1245204, "XTSetter.DeviceList"};
static struct {unsigned f; char r[8];} string76 = {458760, "anacapa"};
static struct {unsigned f; char r[4];} string77 = {196612, "xcc"};
static struct {unsigned f; char r[28];} string78 = {1572892, "XTSetter.PrinterVersions\000\000\000"};
static struct {unsigned f; char r[12];} string79 = {524300, "Spooler:\000\000\000"};
static struct {unsigned f; char r[12];} string80 = {720908, "Available  "};
static struct {unsigned f; char r[12];} string81 = {655372, "Formatter:\000"};
static struct {unsigned f; char r[12];} string82 = {655372, "Available \000"};
static struct {unsigned f; char r[16];} string83 = {983056, "Marking engine:"};
static struct {unsigned f; char r[20];} string84 = {1114132, "NeedsKeyOperator \000\000"};
static struct {unsigned f; char r[4];} string85 = {65540, "?\000\000"};
static struct {unsigned f; char r[28];} string86 = {1638428, "Problem with printer: %g\012\000\000"};
static struct {unsigned f; char r[4];} string87 = {65540, ",\000\000"};
static struct {unsigned f; char r[12];} string88 = {589836, "available\000\000"};
static struct {unsigned f; char r[8];} string89 = {262152, "busy\000\000\000"};
static struct {unsigned f; char r[8];} string90 = {458760, "3.0-PGS"};
static struct {unsigned f; char r[8];} string91 = {262152, "STOP\000\000\000"};
static struct {unsigned f; char r[8];} string92 = {458760, "Sending"};
static struct {unsigned f; char r[24];} string93 = {1507352, "Status of %g: %g -> %g\012"};
static struct {unsigned f; char r[8];} string94 = {458760, "%g: %g\012"};
static struct {unsigned f; char r[24];} string95 = {1376280, "XTSViewerPositionInfo\000\000"};
static struct {unsigned f; char r[8];} string96 = {393224, "Zipper\000"};
static struct {unsigned f; char r[8];} string97 = {393224, "3.0-CS\000"};
static struct {unsigned f; char r[12];} string98 = {589836, "Perfector\000\000"};
static struct {unsigned f; char r[12];} string99 = {589836, " DEFAULT \000\000"};
static struct {unsigned f; char r[4];} string100 = {131076, "[s\000"};
static struct {unsigned f; char r[8];} string101 = {458760, "Failure"};
static struct {unsigned f; char r[16];} string102 = {917520, "XTSetter.icons\000"};
static struct {unsigned f; char r[8];} string103 = {458760, "2.1-RLS"};
static struct {unsigned f; char r[8];} string104 = {458760, "Scripto"};
static struct {unsigned f; char r[12];} string105 = {589836, "Papermate\000\000"};
static struct {unsigned f; char r[4];} string106 = {196612, "1.0"};
static struct {unsigned f; char r[16];} string107 = {851984, "\257\300\063\243\026\261\300\116\363\204\366\100\200\000\000"};
static struct {unsigned f; char r[28];} string108 = {1703962, "\006\011\024\001\030\001\034\001\040\001\044\001\050\001\054\001\074\001\100\240\010\000\004\100\124\001\000"};
static struct {unsigned f; char r[16];} string109 = {851984, "\257\300\061\070\246\330\300\204\123\076\053\100\150\000\000"};
static struct {unsigned f; char r[16];} string110 = {851984, "\257\300\271\262\125\170\300\162\064\273\376\100\150\000\000"};
static struct {unsigned f; char r[16];} string111 = {851984, "\257\300\254\030\332\131\300\213\154\253\301\100\150\000\000"};
static struct {unsigned f; char r[16];} string112 = {851984, "\257\300\373\225\000\071\300\362\156\307\320\100\150\000\000"};
static struct {unsigned f; char r[16];} string113 = {851984, "\257\300\176\323\376\273\300\203\041\251\010\100\150\000\000"};
static struct {unsigned f; char r[16];} string114 = {851984, "\257\300\255\053\300\023\300\142\135\315\105\100\150\000\000"};
static struct {unsigned f; char r[16];} string115 = {851984, "\257\300G%\013←\300`#|\374@h\000\000"};
static struct {unsigned f; char r[16];} string116 = {851984, "\257\300\031\357\041\010\300\216\301\043\377\100\150\000\000"};
static struct {unsigned f; char r[16];} string117 = {851984, "\257\300\015\277\004\146\300\034\367\146\045\100\164\000\000"};
static struct {unsigned f; char r[16];} string118 = {851984, "\257\300\011\021\311\300\300\132\131\043\377\100\150\000\000"};
static struct {unsigned f; char r[16];} string119 = {851984, "\257\300\317\042\141\053\300\247\142\073\274\100\150\000\000"};
static struct {unsigned f; char r[16];} string120 = {851984, "\257\300\141\260\110\353\300\162\250\066\353\100\150\000\000"};
static struct {unsigned f; char r[16];} string121 = {851984, "\257\300\262\273\312\107\300\263\011\337\010\100\150\000\000"};
static struct {unsigned f; char r[16];} string122 = {851984, "\257\300\346\240\101\312\300\362\270\362\345\100\150\000\000"};
static struct {unsigned f; char r[16];} string123 = {851984, "\257\300\240\236\274\315\300\111\163\325\023\100\150\000\000"};
static struct {unsigned f; char r[16];} string124 = {851984, "\257\300\363\223\326\161\300\017\164\046\072\100\150\000\000"};
static struct {unsigned f; char r[16];} string125 = {851984, "\257\300\255\220\043\324\300\140\002\100\200\100\150\000\000"};
static struct {unsigned f; char r[16];} string126 = {851984, "\257\300\117\004\011\134\300\015\100\060\362\100\150\000\000"};
static struct {unsigned f; char r[16];} string127 = {851984, "\257\300\072\337\114\355\300\232\070\352\142\100\150\000\000"};
static struct {unsigned f; char r[16];} string128 = {851984, "\257\300\320\311\235\120\300\167\152\340\132\100\150\000\000"};
static struct {unsigned f; char r[16];} string129 = {851984, "\257\300\134\353\367\206\300\202\044\112\356\100\150\000\000"};
static struct {unsigned f; char r[16];} string130 = {851984, "\257\300\307\064\200\136\300\211\002\312\172\100\150\000\000"};
static struct {unsigned f; char r[16];} string131 = {851984, "\257\300\254\253\350\355\300\233\126\335\104\100\150\000\000"};
static struct {unsigned f; char r[16];} string132 = {851984, "\257\300\354\332\367\333\300\361\203\205\173\100\150\000\000"};
static struct {unsigned f; char r[16];} string133 = {851984, "\257\300\045\005\337\143\300\252\356\334\244\100\150\000\000"};
static struct {unsigned f; char r[16];} string134 = {851984, "\257\300\332\340\311\370\300\226\134\357\055\100\150\000\000"};
static struct {unsigned f; char r[16];} string135 = {851984, "\257\300\306\227\367\035\300\335\164\342\360\100\150\000\000"};
static struct {unsigned f; char r[16];} string136 = {851984, "\257\300\025\111\264\003\300\120\101\002\231\100\150\000\000"};
static struct {unsigned f; char r[16];} string137 = {851984, "\257\300\267\042\202\002\300\227\171\261\041\100\150\000\000"};
static struct {unsigned f; char r[8];} string138 = {1481921381, "tter"};
static struct {unsigned f; char r[16];} string139 = {851984, "\257\300\250\170\135\274\300\073\343\245\166\100\164\000\000"};
static struct {unsigned f; char r[24];} string140 = {1310744, "\211\010\007\124\157\157\154\122\145\160\300\250\170\135\274\300\073\343\245\166\000\000\000"};
static struct {unsigned f; char r[16];} string141 = {851984, "\257\300\307\354\363\163\300\374\037\154\341\100\150\000\000"};
static struct {
   word f0[125]; word f125; word f126; word f127; 
   word f128; word f129; word f130; word f131; 
   word f132; word f133; word f134; word f135; 
   word f136; word f137; word f138; word f139; 
   word f140; word f141; word f142; word f143; 
   word f144; word f145; word f146; word f147; 
   word f148; word f149; word f150; word f151; 
   word f152; word f153; word f154; word f155; 
   word f156; word f157; word f158; word f159; 
   word f160; word f161; word f162; word f163; 
   word f164; word f165; word f166; word f167; 
   word f168; word f169; word f170; word f171; 
   word f172; word f173; word f174; word f175; 
   word f176; word f177; word f178; word f179; 
   word f180; word f181; word f182; word f183; 
   word f184; word f185; word f186; word f187; 
   word f188; word f189; word f190; word f191; 
   word f192; word f193; word f194; word f195; 
   word f196; word f197; word f198; word f199; 
   word f200; word f201; word f202; word f203; 
   word f204; word f205; word f206; word f207; 
   word f208; word f209; word f210; word f211; 
   word f212; word f213; word f214; word f215; 
   word f216; word f217; word f218; word f219; 
   word f220; word f221; word f222; word f223; 
   word f224; word f225; word f226; word f227; 
   word f228; word f229; word f230; word f231; 
   word f232; word f233; word f234[33]; 
   } globalframe = {
   {0}, (word) Init←P3300, 0, (word) NewUser←P3240, 
   0, (word) NewProfile←P3180, 0, (word) XTSetterCommand←P3120, 
   0, (word) DefinePrinterVersions←P3060, 0, (word) SetupPrinterVersion←P3000, 
   0, (word) RedisplayTool←P2880, 0, (word) XTSViewerAdjust←P2820, 
   0, (word) PlaceChild←P2760, 0, (word) PrintStatusUpdate←P2700, 
   0, (word) SetSendingStatus←P2640, 0, (word) StopButtonProc←P2580, 
   0, (word) ResizeStatusContainer←P2520, 0, (word) CreateStatusReport←P2460, 
   0, (word) ServerStatusWatcher←P2400, 0, (word) DestroyServerStatusViewer←P2340, 
   0, (word) CreateServerStatusViewer←P2280, 0, (word) DefaultOptionsFromProfile←P2220, 
   0, (word) DefaultOptions←P2160, 0, (word) SetOptions←P2100, 
   0, (word) GetOptionsInternal←P2040, 0, (word) GetOptions←P1980, 
   0, (word) DestroyOptionsViewer←P1920, 0, (word) CreateOptionsViewer←P1860, 
   0, (word) ClickCompress←P1800, 0, (word) ClickRopeButton←P1740, 
   0, (word) SetRopeButton←P1680, 0, (word) GetRopeButton←P1620, 
   0, (word) CreateRopeButton←P1560, 0, (word) ClickRealButton←P1500, 
   0, (word) SetRealButton←P1440, 0, (word) GetRealButton←P1380, 
   0, (word) CreateRealButton←P1320, 0, (word) ClickIntButton←P1260, 
   0, (word) SetIntButton←P1200, 0, (word) GetIntButton←P1140, 
   0, (word) CreateIntButton←P1080, 0, (word) SetBoolButton←P1020, 
   0, (word) GetBoolButton←P960, 0, (word) ClickBoolButton←P900, 
   0, (word) CreateBoolButton←P840, 0, (word) ServerStatusButton←P780, 
   0, (word) OptionsButton←P720, 0, (word) PrintButton←P660, 
   0, (word) ColorScreenButton←P600, 0, (word) RightScreenButton←P540, 
   0, (word) ScreenButton←P480, 0, (word) LeftScreenButton←P420, 
   0, (word) NewButton←P360, 0, (word) DestroyTool←P300, 
   0, (word) GetLabel←P240, 0, (word) CreateViewer←P180, 
   0, (word) NewTool←P120, 0, (word) GetTool←P60, 
   0, (word) XTSetterImpl←P0, {0}
   };

static void NoName←Q5892()
   {
   register ptr gf←c0719 =  (ptr) &globalframe;
   word var←c64700;
   (* (( (ptr) gf←c0719)+16) ) = (word) XR←GetTypeIndex((word) &string1, 0, (word) &string2);
   (* (( (ptr) gf←c0719)+17) ) = (word) XR←GetTypeIndex((word) &string3, 0, (word) &string4);
   (* (( (ptr) gf←c0719)+19) ) = (word) XR←GetTypeIndex((word) &string5, 0, (word) &string6);
   (* (( (ptr) gf←c0719)+23) ) = (word) XR←GetTypeIndex((word) &string7, 0, (word) &string8);
   (* (( (ptr) gf←c0719)+24) ) = (word) XR←GetTypeIndexS((word) (&string9));
   (* (( (ptr) gf←c0719)+25) ) = (word) XR←GetTypeIndex((word) &string10, 0, (word) &string11);
   (* (( (ptr) gf←c0719)+26) ) = (word) XR←GetTypeIndexS((word) (&string12));
   (* (( (ptr) gf←c0719)+27) ) = (word) XR←GetTypeIndex((word) &string13, 0, (word) &string14);
   (* (( (ptr) gf←c0719)+29) ) = (word) XR←GetTypeIndex((word) &string15, 0, (word) &string16);
   (* (( (ptr) gf←c0719)+30) ) = (word) XR←GetTypeIndex((word) &string17, 0, (word) &string18);
   (* (( (ptr) gf←c0719)+31) ) = (word) XR←GetTypeIndex((word) &string19, 0, (word) &string20);
   (* (( (ptr) gf←c0719)+32) ) = (word) XR←GetTypeIndex((word) &string21, 0, (word) &string20);
   (* (( (ptr) gf←c0719)+34) ) = (word) XR←GetTypeIndex((word) &string22, 0, (word) &string20);
   (* (( (ptr) gf←c0719)+39) ) = (word) XR←GetTypeIndex((word) &string23, 0, (word) &string6);
   (*  (ptr) (( (bPt) gf←c0719)+160) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+39) ), (word) &string24);
   (*  (ptr) (( (bPt) gf←c0719)+164) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+19) ), (word) &string25);
   (*  (ptr) (( (bPt) gf←c0719)+168) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+19) ), (word) &string26);
   (*  (ptr) (( (bPt) gf←c0719)+172) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+19) ), (word) &string27);
   (*  (ptr) (( (bPt) gf←c0719)+176) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+19) ), (word) &string28);
   (*  (ptr) (( (bPt) gf←c0719)+180) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+19) ), (word) &string29);
   (*  (ptr) (( (bPt) gf←c0719)+184) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+19) ), (word) &string30);
   (*  (ptr) (( (bPt) gf←c0719)+188) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+19) ), (word) &string31);
   (*  (ptr) (( (bPt) gf←c0719)+192) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+19) ), (word) &string32);
   (*  (ptr) (( (bPt) gf←c0719)+196) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+19) ), (word) &string33);
   (*  (ptr) (( (bPt) gf←c0719)+200) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+19) ), (word) &string34);
   (*  (ptr) (( (bPt) gf←c0719)+204) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+19) ), (word) &string35);
   (*  (ptr) (( (bPt) gf←c0719)+208) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+19) ), (word) &string36);
   (*  (ptr) (( (bPt) gf←c0719)+212) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+19) ), (word) &string37);
   (*  (ptr) (( (bPt) gf←c0719)+216) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+19) ), (word) &string38);
   (*  (ptr) (( (bPt) gf←c0719)+220) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+19) ), (word) &string39);
   (*  (ptr) (( (bPt) gf←c0719)+224) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+19) ), (word) &string40);
   (*  (ptr) (( (bPt) gf←c0719)+228) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+19) ), (word) &string41);
   (*  (ptr) (( (bPt) gf←c0719)+232) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+39) ), (word) &string42);
   (*  (ptr) (( (bPt) gf←c0719)+236) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+39) ), (word) &string43);
   (*  (ptr) (( (bPt) gf←c0719)+240) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+39) ), (word) &string44);
   (*  (ptr) (( (bPt) gf←c0719)+244) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+19) ), (word) &string45);
   (*  (ptr) (( (bPt) gf←c0719)+248) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+19) ), (word) &string46);
   (*  (ptr) (( (bPt) gf←c0719)+252) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+19) ), (word) &string47);
   (*  (ptr) (( (bPt) gf←c0719)+256) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+19) ), (word) &string48);
   (*  (ptr) (( (bPt) gf←c0719)+260) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+19) ), (word) &string49);
   (*  (ptr) (( (bPt) gf←c0719)+264) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+19) ), (word) &string50);
   (*  (ptr) (( (bPt) gf←c0719)+268) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+19) ), (word) &string51);
   (*  (ptr) (( (bPt) gf←c0719)+272) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+19) ), (word) &string52);
   (*  (ptr) (( (bPt) gf←c0719)+276) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+19) ), (word) &string53);
   (*  (ptr) (( (bPt) gf←c0719)+280) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+19) ), (word) &string54);
   (*  (ptr) (( (bPt) gf←c0719)+284) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+19) ), (word) &string55);
   (*  (ptr) (( (bPt) gf←c0719)+288) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+19) ), (word) &string56);
   (*  (ptr) (( (bPt) gf←c0719)+292) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+19) ), (word) &string57);
   (*  (ptr) (( (bPt) gf←c0719)+296) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+19) ), (word) &string58);
   (*  (ptr) (( (bPt) gf←c0719)+300) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+19) ), (word) &string59);
   (*  (ptr) (( (bPt) gf←c0719)+304) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+19) ), (word) &string60);
   (*  (ptr) (( (bPt) gf←c0719)+308) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+19) ), (word) &string61);
   (*  (ptr) (( (bPt) gf←c0719)+312) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+19) ), (word) &string62);
   (*  (ptr) (( (bPt) gf←c0719)+316) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+19) ), (word) &string63);
   (*  (ptr) (( (bPt) gf←c0719)+320) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+19) ), (word) &string64);
   (*  (ptr) (( (bPt) gf←c0719)+324) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+19) ), (word) &string65);
   (*  (ptr) (( (bPt) gf←c0719)+328) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+19) ), (word) &string66);
   (*  (ptr) (( (bPt) gf←c0719)+332) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+19) ), (word) &string67);
   (*  (ptr) (( (bPt) gf←c0719)+336) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+19) ), (word) &string68);
   (*  (ptr) (( (bPt) gf←c0719)+340) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+19) ), (word) &string69);
   (*  (ptr) (( (bPt) gf←c0719)+344) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+19) ), (word) &string70);
   (*  (ptr) (( (bPt) gf←c0719)+348) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+19) ), (word) &string71);
   (*  (ptr) (( (bPt) gf←c0719)+352) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+19) ), (word) &string72);
   (*  (ptr) (( (bPt) gf←c0719)+356) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+19) ), (word) &string73);
   (*  (ptr) (( (bPt) gf←c0719)+360) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+19) ), (word) &string74);
   (*  (ptr) (( (bPt) gf←c0719)+364) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+19) ), (word) &string75);
   (*  (ptr) (( (bPt) gf←c0719)+368) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+19) ), (word) &string76);
   (*  (ptr) (( (bPt) gf←c0719)+372) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+19) ), (word) &string77);
   (*  (ptr) (( (bPt) gf←c0719)+376) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+19) ), (word) &string78);
   (*  (ptr) (( (bPt) gf←c0719)+380) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+19) ), (word) &string79);
   (*  (ptr) (( (bPt) gf←c0719)+384) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+19) ), (word) &string80);
   (*  (ptr) (( (bPt) gf←c0719)+388) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+19) ), (word) &string81);
   (*  (ptr) (( (bPt) gf←c0719)+392) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+19) ), (word) &string82);
   (*  (ptr) (( (bPt) gf←c0719)+396) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+19) ), (word) &string83);
   (*  (ptr) (( (bPt) gf←c0719)+400) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+19) ), (word) &string84);
   (*  (ptr) (( (bPt) gf←c0719)+404) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+19) ), (word) &string85);
   (*  (ptr) (( (bPt) gf←c0719)+408) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+19) ), (word) &string86);
   (*  (ptr) (( (bPt) gf←c0719)+412) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+19) ), (word) &string87);
   (*  (ptr) (( (bPt) gf←c0719)+416) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+19) ), (word) &string88);
   (*  (ptr) (( (bPt) gf←c0719)+420) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+19) ), (word) &string89);
   (*  (ptr) (( (bPt) gf←c0719)+424) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+19) ), (word) &string90);
   (*  (ptr) (( (bPt) gf←c0719)+428) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+19) ), (word) &string91);
   (*  (ptr) (( (bPt) gf←c0719)+432) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+19) ), (word) &string92);
   (*  (ptr) (( (bPt) gf←c0719)+436) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+19) ), (word) &string93);
   (*  (ptr) (( (bPt) gf←c0719)+440) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+19) ), (word) &string94);
   (*  (ptr) (( (bPt) gf←c0719)+444) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+39) ), (word) &string95);
   (*  (ptr) (( (bPt) gf←c0719)+448) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+19) ), (word) &string96);
   (*  (ptr) (( (bPt) gf←c0719)+452) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+19) ), (word) &string97);
   (*  (ptr) (( (bPt) gf←c0719)+456) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+19) ), (word) &string98);
   (*  (ptr) (( (bPt) gf←c0719)+460) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+19) ), (word) &string99);
   (*  (ptr) (( (bPt) gf←c0719)+464) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+19) ), (word) &string100);
   (*  (ptr) (( (bPt) gf←c0719)+468) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+39) ), (word) &string101);
   (*  (ptr) (( (bPt) gf←c0719)+472) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+19) ), (word) &string102);
   (*  (ptr) (( (bPt) gf←c0719)+476) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+19) ), (word) &string103);
   (*  (ptr) (( (bPt) gf←c0719)+480) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+19) ), (word) &string104);
   (*  (ptr) (( (bPt) gf←c0719)+484) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+19) ), (word) &string105);
   (*  (ptr) (( (bPt) gf←c0719)+488) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+19) ), (word) &string106);
   (*  (ptr) (( (bPt) gf←c0719)+492) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0719)+19) ), (word) &string24);
   (void) XR←DeclareGlobalFrame((word) "XTSetterImpl", &globalframe, (word) XR←GetTypeIndex((word) &string107, 0, (word) &string108)
      , (word) (( (bPt) gf←c0719)+932)/* var←c58908 */ );
   var←c64700 = (word) XR←ImportInterface((word) "Args", (word) XR←GetTypeIndexS((word) (&string109)), 10);
   (* (( (ptr) gf←c0719)+261)/* var←c64092 */  ) = var←c64700;
   (void) XR←ImportProc(var←c64700, 8, 360, 12, 3);
   var←c64700 = (word) XR←ImportInterface((word) "Buttons", (word) XR←GetTypeIndexS((word) (&string110)), 4);
   (* (( (ptr) gf←c0719)+247)/* var←c60188 */  ) = var←c64700;
   (void) XR←ImportProcS(var←c64700, 787203);
   (void) XR←ImportProcS(var←c64700, 76283912);
   var←c64700 = (word) XR←ImportInterface((word) "ChoiceButtons", (word) XR←GetTypeIndexS((word) (&string111)), 9);
   (* (( (ptr) gf←c0719)+252)/* var←c61436 */  ) = var←c64700;
   (void) XR←ImportProcS(var←c64700, 786947);
   (void) XR←ImportProcS(var←c64700, 67371265);
   (void) XR←ImportProcS(var←c64700, 70516749);
   var←c64700 = (word) XR←ImportInterface((word) "Commander", (word) XR←GetTypeIndexS((word) (&string112)), 3);
   (* (( (ptr) gf←c0719)+264)/* var←c64572 */  ) = var←c64700;
   (void) XR←ImportProcS(var←c64700, 1310725);
   var←c64700 = (word) XR←ImportInterface((word) "Containers", (word) XR←GetTypeIndexS((word) (&string113)), 5);
   (* (( (ptr) gf←c0719)+250)/* var←c60988 */  ) = var←c64700;
   (void) XR←ImportProcS(var←c64700, 74711042);
   var←c64700 = (word) XR←ImportInterface((word) "Convert", (word) XR←GetTypeIndexS((word) (&string114)), 73);
   (* (( (ptr) gf←c0719)+248)/* var←c60412 */  ) = var←c64700;
   (void) XR←ImportProcS(var←c64700, 67902211);
   (void) XR←ImportProcS(var←c64700, 67373057);
   (void) XR←ImportProcS(var←c64700, 67901187);
   (void) XR←ImportProcS(var←c64700, 67634690);
   var←c64700 = (word) XR←ImportInterface((word) "FileDWIM", (word) XR←GetTypeIndexS((word) (&string115)), 1);
   (* (( (ptr) gf←c0719)+246)/* var←c60060 */  ) = var←c64700;
   (void) XR←ImportProcS(var←c64700, 269484036);
   var←c64700 = (word) XR←ImportInterface((word) "Icons", (word) XR←GetTypeIndexS((word) (&string116)), 3);
   (* (( (ptr) gf←c0719)+262)/* var←c64316 */  ) = var←c64700;
   (void) XR←ImportProcS(var←c64700, 67633666);
   var←c64700 = (word) XR←ImportInterface((word) "IO", (word) XR←GetTypeIndexS((word) (&string117)), 103);
   (* (( (ptr) gf←c0719)+239)/* var←c59292 */  ) = var←c64700;
   (void) XR←ImportProcS(var←c64700, 1071364);
   (void) XR←ImportProcS(var←c64700, 1063171);
   (void) XR←ImportProcS(var←c64700, 267521);
   (void) XR←ImportProcS(var←c64700, 2111493);
   var←c64700 = (word) XR←ImportInterface((word) "Labels", (word) XR←GetTypeIndexS((word) (&string118)), 4);
   (* (( (ptr) gf←c0719)+256)/* var←c62556 */  ) = var←c64700;
   (void) XR←ImportProcS(var←c64700, 787203);
   (void) XR←ImportProcS(var←c64700, 786947);
   (void) XR←ImportProcS(var←c64700, 74973187);
   var←c64700 = (word) XR←ImportInterface((word) "Menus", (word) XR←GetTypeIndexS((word) (&string119)), 21);
   (* (( (ptr) gf←c0719)+240)/* var←c59516 */  ) = var←c64700;
   (void) XR←ImportProcS(var←c64700, 788483);
   (void) XR←ImportProcS(var←c64700, 68682246);
   (void) XR←ImportProcS(var←c64700, 67371009);
   var←c64700 = (word) XR←ImportInterface((word) "PFS", (word) XR←GetTypeIndexS((word) (&string120)), 40);
   (* (( (ptr) gf←c0719)+245)/* var←c59996 */  ) = var←c64700;
   var←c64700 = (word) XR←ImportInterface((word) "PieViewers", (word) XR←GetTypeIndexS((word) (&string121)), 2);
   (* (( (ptr) gf←c0719)+258)/* var←c63228 */  ) = var←c64700;
   (void) XR←ImportProcS(var←c64700, 524546);
   (void) XR←ImportProcS(var←c64700, 68681734);
   var←c64700 = (word) XR←ImportInterface((word) "PrintingP4V3Aux", (word) XR←GetTypeIndexS((word) (&string122)), 32);
   (* (( (ptr) gf←c0719)+257)/* var←c62940 */  ) = var←c64700;
   (void) XR←ImportProcS(var←c64700, 67634690);
   (void) XR←ImportProcS(var←c64700, 67635970);
   (void) XR←ImportProcS(var←c64700, 67639042);
   (void) XR←ImportProcS(var←c64700, 67636482);
   var←c64700 = (word) XR←ImportInterface((word) "Process", (word) XR←GetTypeIndexS((word) (&string123)), 22);
   (* (( (ptr) gf←c0719)+255)/* var←c62492 */  ) = var←c64700;
   (void) XR←ImportProcS(var←c64700, 67371777);
   (void) XR←ImportProcS(var←c64700, 525570);
   (void) XR←ImportProcS(var←c64700, 526081);
   var←c64700 = (word) XR←ImportInterface((word) "Rope", (word) XR←GetTypeIndexS((word) (&string124)), 43);
   (* (( (ptr) gf←c0719)+235)/* var←c59004 */  ) = var←c64700;
   (void) XR←ImportProcS(var←c64700, 68419845);
   (void) XR←ImportProcS(var←c64700, 67900419);
   (void) XR←ImportProcS(var←c64700, 67373569);
   (void) XR←ImportProcS(var←c64700, 68158980);
   (void) XR←ImportProcS(var←c64700, 67898627);
   (void) XR←ImportProcS(var←c64700, 67896323);
   (void) XR←ImportProcS(var←c64700, 67373313);
   (void) XR←ImportProcS(var←c64700, 67633666);
   var←c64700 = (word) XR←ImportInterface((word) "RopeList", (word) XR←GetTypeIndexS((word) (&string125)), 15);
   (* (( (ptr) gf←c0719)+251)/* var←c61372 */  ) = var←c64700;
   (void) XR←ImportProcS(var←c64700, 67372545);
   (void) XR←ImportProcS(var←c64700, 67895555);
   var←c64700 = (word) XR←ImportInterface((word) "Rules", (word) XR←GetTypeIndexS((word) (&string126)), 3);
   (* (( (ptr) gf←c0719)+253)/* var←c61564 */  ) = var←c64700;
   (void) XR←ImportProcS(var←c64700, 74973187);
   var←c64700 = (word) XR←ImportInterface((word) "SymTab", (word) XR←GetTypeIndexS((word) (&string127)), 13);
   (* (( (ptr) gf←c0719)+260)/* var←c63996 */  ) = var←c64700;
   (void) XR←ImportProcS(var←c64700, 67896835);
   (void) XR←ImportProcS(var←c64700, 67633410);
   (void) XR←ImportProcS(var←c64700, 134742786);
   var←c64700 = (word) XR←ImportInterface((word) "TypeScript", (word) XR←GetTypeIndexS((word) (&string128)), 25);
   (* (( (ptr) gf←c0719)+241)/* var←c59644 */  ) = var←c64700;
   (void) XR←ImportProcS(var←c64700, 74711042);
   var←c64700 = (word) XR←ImportInterface((word) "UserProfile", (word) XR←GetTypeIndexS((word) (&string129)), 11);
   (* (( (ptr) gf←c0719)+254)/* var←c62044 */  ) = var←c64700;
   (void) XR←ImportProcS(var←c64700, 264193);
   (void) XR←ImportProcS(var←c64700, 67633922);
   (void) XR←ImportProcS(var←c64700, 67633666);
   (void) XR←ImportProcS(var←c64700, 67633154);
   var←c64700 = (word) XR←ImportInterface((word) "ViewerIO", (word) XR←GetTypeIndexS((word) (&string130)), 5);
   (* (( (ptr) gf←c0719)+238)/* var←c59164 */  ) = var←c64700;
   (void) XR←ImportProcS(var←c64700, 135528453);
   (void) XR←ImportProcS(var←c64700, 67109376);
   var←c64700 = (word) XR←ImportInterface((word) "ViewerLocks", (word) XR←GetTypeIndexS((word) (&string131)), 9);
   (* (( (ptr) gf←c0719)+259)/* var←c63356 */  ) = var←c64700;
   (void) XR←ImportProcS(var←c64700, 524290);
   var←c64700 = (word) XR←ImportInterface((word) "ViewerOps", (word) XR←GetTypeIndexS((word) (&string132)), 43);
   (* (( (ptr) gf←c0719)+237)/* var←c59100 */  ) = var←c64700;
   (void) XR←ImportProcS(var←c64700, 524290);
   (void) XR←ImportProcS(var←c64700, 67639554);
   (void) XR←ImportProcS(var←c64700, 792579);
   (void) XR←ImportProcS(var←c64700, 1575430);
   (void) XR←ImportProcS(var←c64700, 1319173);
   (void) XR←ImportProcS(var←c64700, 527106);
   (void) XR←ImportProcS(var←c64700, 1051652);
   (void) XR←ImportProcS(var←c64700, 793603);
   (void) XR←ImportProcS(var←c64700, 74973699);
   (void) XR←ImportProcS(var←c64700, 267521);
   var←c64700 = (word) XR←ImportInterface((word) "ViewerTools", (word) XR←GetTypeIndexS((word) (&string133)), 12);
   (* (( (ptr) gf←c0719)+242)/* var←c59676 */  ) = var←c64700;
   (void) XR←ImportProcS(var←c64700, 524802);
   (void) XR←ImportProcS(var←c64700, 788227);
   (void) XR←ImportProcS(var←c64700, 67372545);
   (void) XR←ImportProcS(var←c64700, 74711298);
   (void) XR←ImportProcS(var←c64700, 67109632);
   (void) XR←ImportProcS(var←c64700, 67109888);
   (void) XR←ImportProcS(var←c64700, 264705);
   var←c64700 = (word) XR←ImportInterface((word) "VFonts", (word) XR←GetTypeIndexS((word) (&string134)), 8);
   (* (( (ptr) gf←c0719)+249)/* var←c60892 */  ) = var←c64700;
   (void) XR←ImportProcS(var←c64700, 67634178);
   (void) XR←ImportProcS(var←c64700, 67633922);
   var←c64700 = (word) XR←ImportInterface((word) "WindowManager", (word) XR←GetTypeIndexS((word) (&string135)), 7);
   (* (( (ptr) gf←c0719)+244)/* var←c59868 */  ) = var←c64700;
   var←c64700 = (word) XR←ImportInterface((word) "XNSCredentials", (word) XR←GetTypeIndexS((word) (&string136)), 5);
   (* (( (ptr) gf←c0719)+263)/* var←c64540 */  ) = var←c64700;
   (void) XR←ImportProcS(var←c64700, 525314);
   var←c64700 = (word) XR←ImportInterface((word) "XNSPrint", (word) XR←GetTypeIndexS((word) (&string137)), 29);
   (* (( (ptr) gf←c0719)+236)/* var←c59068 */  ) = var←c64700;
   (void) XR←ImportProcS(var←c64700, 265473);
   (void) XR←ImportProcS(var←c64700, 335807745);
   (void) XR←ImportProcS(var←c64700, 268698625);
   (void) XR←ImportProcS(var←c64700, 67373057);
   var←c64700 = (word) XR←ImportInterface((word) &string138, (word) XR←GetTypeIndexS((word) (&string139)), 20);
   (* (( (ptr) gf←c0719)+243)/* var←c59836 */  ) = var←c64700;
   (void) XR←ImportProcS(var←c64700, 940049922);
   (void) XR←ImportProcS(var←c64700, 790019);
   (void) XR←ImportProcS(var←c64700, 789763);
   (void) XR←ImportProcS(var←c64700, 790275);
   var←c64700 = (word) XR←ExportInterface((word) &string138, (word) XR←GetTypeIndexS((word) (&string139)), 20);
   (* (( (ptr) gf←c0719)+265)/* var←c64732 */  ) = var←c64700;
   (void) XR←ExportType((word) "ToolRep", (word) XR←GetTypeIndexS((word) (&string140)), (word) XR←GetTypeIndex((word) &string1, 0, (word) &string2)
      );
   (void) XR←ExportVar(var←c64700, 1, (word) (( (bPt) gf←c0719)+496)/* var←c57148 */ );
   (void) XR←ExportProcS(var←c64700, (word) (( (bPt) gf←c0719)+924)/* var←c58876 */ , 67633666);
   (void) XR←ExportProcS(var←c64700, (word) (( (bPt) gf←c0719)+892)/* var←c58748 */ , 262913);
   (void) XR←ExportProcS(var←c64700, (word) (( (bPt) gf←c0719)+644)/* var←c57756 */ , 67109888);
   (void) XR←ExportProcS(var←c64700, (word) (( (bPt) gf←c0719)+668)/* var←c57852 */ , 67634434);
   (void) XR←ExportProcS(var←c64700, (word) (( (bPt) gf←c0719)+652)/* var←c57788 */ , 526082);
   (void) XR←ExportProcS(var←c64700, (word) (( (bPt) gf←c0719)+684)/* var←c57916 */ , 264449);
   (void) XR←ExportProcS(var←c64700, (word) (( (bPt) gf←c0719)+676)/* var←c57884 */ , 264705);
   (void) XR←ExportProcS(var←c64700, (word) (( (bPt) gf←c0719)+628)/* var←c57692 */ , 264961);
   (void) XR←ExportProcS(var←c64700, (word) (( (bPt) gf←c0719)+620)/* var←c57660 */ , 265217);
   var←c64700 = (word) XR←ExportInterface((word) "XTSetterPrivate", (word) XR←GetTypeIndexS((word) (&string141)), 5);
   (* (( (ptr) gf←c0719)+266)/* var←c64764 */  ) = var←c64700;
   (void) XR←ExportProcS(var←c64700, (word) (( (bPt) gf←c0719)+660)/* var←c57820 */ , 67633154);
   (void) XR←ExportProcS(var←c64700, (word) (( (bPt) gf←c0719)+604)/* var←c57596 */ , 67633410);
   (void) XR←ExportProcS(var←c64700, (word) (( (bPt) gf←c0719)+596)/* var←c57564 */ , 262657);
   (void) XR←ExportProcS(var←c64700, (word) (( (bPt) gf←c0719)+580)/* var←c57500 */ , 262913);
   (void) XR←ExportProcS(var←c64700, (word) (( (bPt) gf←c0719)+572)/* var←c57468 */ , 525314);
   }

static void XTSetterImpl←P0(formal←c0136, formal←c0133)
   word formal←c0136;
   word formal←c0133;
   {
   register ptr gf←c64796 =  (ptr) &globalframe;
   /* XTSetterImpl: */ 
SOURCE(1919, 34260)
SOURCE(3005, 18)
   {
      word var←c58940;
      word var←c58972;
      var←c58940 = XR←NewObject(8, (* (( (ptr) gf←c64796)+17) ));
      var←c58972 = var←c58940;
      (*  (ptr) var←c58972 ) = (* (( (ptr) gf←c64796)+63) );
      (* (( (ptr) var←c58972)+1) ) = XR←NewObject(8, (* (( (ptr) gf←c64796)+17) ));
      var←c58972 = (* (( (ptr) var←c58972)+1) );
      (*  (ptr) var←c58972 ) = (* (( (ptr) gf←c64796)+106) );
      (* (( (ptr) var←c58972)+1) ) = XR←NewObject(8, (* (( (ptr) gf←c64796)+17) ));
      var←c58972 = (* (( (ptr) var←c58972)+1) );
      (*  (ptr) var←c58972 ) = (* (( (ptr) gf←c64796)+75) );
      (* (( (ptr) var←c58972)+1) ) = XR←NewObject(8, (* (( (ptr) gf←c64796)+17) ));
      var←c58972 = (* (( (ptr) var←c58972)+1) );
      (*  (ptr) var←c58972 ) = (* (( (ptr) gf←c64796)+106) );
      (* (( (ptr) var←c58972)+1) ) = XR←NewObject(8, (* (( (ptr) gf←c64796)+17) ));
      var←c58972 = (* (( (ptr) var←c58972)+1) );
      (*  (ptr) var←c58972 ) = (* (( (ptr) gf←c64796)+76) );
      (* (( (ptr) var←c58972)+1) ) = XR←NewObject(8, (* (( (ptr) gf←c64796)+17) ));
      var←c58972 = (* (( (ptr) var←c58972)+1) );
      (*  (ptr) var←c58972 ) = (* (( (ptr) gf←c64796)+106) );
      (* (( (ptr) var←c58972)+1) ) = XR←NewObject(8, (* (( (ptr) gf←c64796)+17) ));
      var←c58972 = (* (( (ptr) var←c58972)+1) );
      (*  (ptr) var←c58972 ) = (* (( (ptr) gf←c64796)+112) );
      (* (( (ptr) var←c58972)+1) ) = XR←NewObject(8, (* (( (ptr) gf←c64796)+17) ));
      var←c58972 = (* (( (ptr) var←c58972)+1) );
      (*  (ptr) var←c58972 ) = (* (( (ptr) gf←c64796)+113) );
      (* (( (ptr) var←c58972)+1) ) = XR←NewObject(8, (* (( (ptr) gf←c64796)+17) ));
      var←c58972 = (* (( (ptr) var←c58972)+1) );
      (*  (ptr) var←c58972 ) = (* (( (ptr) gf←c64796)+114) );
      (* (( (ptr) var←c58972)+1) ) = XR←NewObject(8, (* (( (ptr) gf←c64796)+17) ));
      var←c58972 = (* (( (ptr) var←c58972)+1) );
      (*  (ptr) var←c58972 ) = (* (( (ptr) gf←c64796)+119) );
      (* (( (ptr) var←c58972)+1) ) = XR←NewObject(8, (* (( (ptr) gf←c64796)+17) ));
      var←c58972 = (* (( (ptr) var←c58972)+1) );
      (*  (ptr) var←c58972 ) = (* (( (ptr) gf←c64796)+120) );
      (* (( (ptr) var←c58972)+1) ) = XR←NewObject(8, (* (( (ptr) gf←c64796)+17) ));
      var←c58972 = (* (( (ptr) var←c58972)+1) );
      (*  (ptr) var←c58972 ) = (* (( (ptr) gf←c64796)+122) );
      (* (( (ptr) var←c58972)+1) ) = XR←NewObject(8, (* (( (ptr) gf←c64796)+17) ));
      var←c58972 = (* (( (ptr) var←c58972)+1) );
      (*  (ptr) var←c58972 ) = (* (( (ptr) gf←c64796)+121) );
      (* (( (ptr) var←c58972)+1) ) = XR←NewObject(8, (* (( (ptr) gf←c64796)+17) ));
      var←c58972 = (* (( (ptr) var←c58972)+1) );
      (*  (ptr) var←c58972 ) = (* (( (ptr) gf←c64796)+122) );
      (* (( (ptr) gf←c64796)+11)/* standardVersions←v4428 */  ) = var←c58940;
      };
SOURCE(8906, 20)
   (* (( (ptr) gf←c64796)+12)/* entryHSpace←v4876 */  ) = 6;
SOURCE(8928, 21)
   (* (( (ptr) gf←c64796)+13)/* entryVSpace←v4904 */  ) = 16;
SOURCE(8951, 17)
   (* (( (ptr) gf←c64796)+14)/* textFuzz←v4932 */  ) = 1;
SOURCE(34491, 56)
   {
      word pd142;
      pd142 = (* (( (ptr) (* (( (ptr) gf←c64796)+235)/* var←c59004 */  ))+6) );
      (* (( (ptr) gf←c64796)+15)/* cmdUsage←v6108 */  ) = (word) ( *( (fPt) ((*  (ptr) pd142 ))))((* (( (ptr) gf←c64796)+61) ), (* (
            ( (ptr) gf←c64796)+62) ), pd142);
      };
SOURCE(36173, 6)
   (void) Init←P3300();
   }

static word GetTool←P60(formal←c0907, new←v6796)
   word formal←c0907;
   word new←v6796;
   {
   W8 var←c64828;
   /* declaration of printer←v6768 skipped */ 
   register ptr gf←c64860 =  (ptr) &globalframe;
   /* declaration of tool←v6840 skipped */ 
   /* declaration of var←c59036 skipped */ 
   var←c64828.f4/* printer←v6768 */  = formal←c0907;
   /* GetTool: */ 
SOURCE(3266, 31410)
   {
      word tmpAddr143;
      tmpAddr143 = (word) (( (ptr) &var←c64828)+6)/* var←c59036 */ ;
      (*  (ptr) tmpAddr143 ) = ( ((word)  (fPt) LookUpTool←P3360) );
      (* (( (ptr) tmpAddr143) + 1) ) = 1;
      };
SOURCE(3266, 31410)
   var←c64828.f5/* tool←v6840 */  = 0;
SOURCE(3530, 31146)
   {
      word pd144;
      pd144 = (* (( (ptr) (* (( (ptr) gf←c64860)+235)/* var←c59004 */  ))+13) );
      if ((0 != (word) ( *( (fPt) ((*  (ptr) pd144 ))))(var←c64828.f4/* printer←v6768 */ , pd144))) {
SOURCE(3560, 31116)
         {
            word pd145;
            pd145 = (* (( (ptr) (* (( (ptr) gf←c64860)+236)/* var←c59068 */  ))+12) );
            var←c64828.f4/* printer←v6768 */  = (* (( (ptr) ( *( (fPt) ((*  (ptr) pd145 ))))(0, pd145))+5) );
            };
         };
      };
SOURCE(3606, 51)
   if ((0 == new←v6796)) {
SOURCE(3619, 38)
      {
         word pd146;
         pd146 = (* (( (ptr) (* (( (ptr) gf←c64860)+237)/* var←c59100 */  ))+25) );
         (void) ( *( (fPt) ((*  (ptr) pd146 ))))((word) ((( (bPt) &var←c64828)+24)/* var←c59036 */ ), pd146);
         };
      };
SOURCE(3687, 30989)
   if ((var←c64828.f5/* tool←v6840 */  == 0)) {
SOURCE(3704, 30972)
      {
         word var←c59132;
         {
            word pd147;
            pd147 = (* (( (ptr) (* (( (ptr) gf←c64860)+238)/* var←c59164 */  ))+6) );
            var←c59132 = (word) ( *( (fPt) ((*  (ptr) pd147 ))))(pd147);
            };
         var←c64828.f5/* tool←v6840 */  = (word) NewTool←P120(var←c64828.f4/* printer←v6768 */ , var←c59132);
         };
      };
SOURCE(3266, 31410)
   return(var←c64828.f5/* tool←v6840 */ );
   }

static word LookUpTool←P3360(v←v45936, formal←c64924)
   word v←v45936;
   word formal←c64924;
   {
   register ptr gf←c64892 =  (ptr) &globalframe;
   word var←c45980;
   formal←c64924 = (formal←c64924 - 24);
   /* LookUpTool: */ 
SOURCE(3359, 31317)
SOURCE(3359, 31317)
   var←c45980 = 1;
SOURCE(3394, 31282)
   {
      word pd149;
      if (((*  (ptr) v←v45936 ) != (* (( (ptr) gf←c64892)+5)/* xTSViewerClass←v4260 */  ))) { goto then0148;};
      if ((* (( (bPt) v←v45936)+77) ) & 0100) { goto then0148;};
      pd149 = (* (( (ptr) (* (( (ptr) gf←c64892)+235)/* var←c59004 */  ))+8) );
      if ((0 == (word) ( *( (fPt) ((*  (ptr) pd149 ))))((* (( (ptr) v←v45936)+13) ), (* (( (ptr) formal←c64924)+4) ), 1, pd149)
      )) {
         then0148: ;
SOURCE(3472, 13)
         return(1);
         };
      };
SOURCE(3487, 22)
   (* (( (ptr) formal←c64924)+5) ) = XR←Narrow((* (( (ptr) v←v45936)+26) ), (* (( (ptr) gf←c64892)+16) ));
SOURCE(3511, 14)
   return(0);
   }

static word NewTool←P120(formal←c0908, formal←c0909)
   word formal←c0908;
   word formal←c0909;
   {
   W7 var←c64956;
   /* declaration of printer←v6900 skipped */ 
   /* declaration of feedBack←v6928 skipped */ 
   /* declaration of tool←v6972 skipped */ 
   var←c64956.f4/* printer←v6900 */  = formal←c0908;
   var←c64956.f5/* feedBack←v6928 */  = formal←c0909;
   /* NewTool: */ 
SOURCE(3771, 30905)
SOURCE(3771, 30905)
   var←c64956.f6/* tool←v6972 */  = 0;
SOURCE(3844, 30832)
   {
      word var←c0829;
      var←c0829 = (word) &var←c64956;
       (void) (word) XR←Enable(( ((word)  (fPt) NoName←Q5952) ), ( ((word)  (fPt) NoName←Q8292) ), var←c0829);
      };
SOURCE(3771, 30905)
   return(var←c64956.f6/* tool←v6972 */ );
   }

static word NoName←Q5952(formal←c0725)
   word formal←c0725;
   {
   register ptr gf←c0724 =  (ptr) &globalframe;
SOURCE(4021, 30655)
   {
      word var←c59324;
      var←c59324 = XR←NewObject(152, (* (( (ptr) gf←c0724)+16) ));
      (* (( (ptr) var←c59324)+4) ) = (* (( (ptr) formal←c0725)+4) );
      (* (( (ptr) formal←c0725)+6) ) = var←c59324;
      };
SOURCE(4068, 30608)
   {
      W3 var←c59356;
      W4 var←c0149;
      {
         word pd150;
         pd150 = (* (( (ptr) (* (( (ptr) gf←c0724)+236)/* var←c59068 */  ))+8) );
         (void) ( *( (fPt) ((*  (ptr) pd150 ))))((word) &var←c0149, (* (( (ptr) (* (( (ptr) formal←c0725)+6) ))+4) ), pd150);
         };
      var←c59356 = (*  (W3Pt) (( (ptr) &var←c0149)+1) );
      (*  (W3Pt) (( (ptr) (* (( (ptr) formal←c0725)+6) ))+6) ) = var←c59356;
      };
SOURCE(4149, 25)
   (void) SetupPrinterVersion←P3000((* ((( (ptr) formal←c0725)+6)) ));
SOURCE(4176, 30500)
   (* (( (ptr) (* (( (ptr) formal←c0725)+6) ))+11) ) = (word) DefaultOptions←P2160();
SOURCE(4216, 58)
   (* (( (ptr) (* (( (ptr) (* (( (ptr) formal←c0725)+6) ))+11) ))+1) ) = (* (( (ptr) (* (( (ptr) (* (( (ptr) formal←c0725)+6)
          ))+5) ))+3) );
SOURCE(4276, 18)
   (void) CreateViewer←P180((* ((( (ptr) formal←c0725)+6)) ));
SOURCE(4346, 30330)
   {
      W2 var←c59388;
      {
         W2 var←c59420;
         word v←v57100;
         v←v57100 = (* (( (ptr) (* (( (ptr) formal←c0725)+6) ))+4) );
         var←c59420.f0 = 11;
         var←c59420.f1 = v←v57100;
         var←c59388 = var←c59420;
         };
      {
         word pd151;
         pd151 = (* (( (ptr) (* (( (ptr) gf←c0724)+239)/* var←c59292 */  ))+61) );
         (void) ( *( (fPt) ((*  (ptr) pd151 ))))((* (( (ptr) (* (( (ptr) formal←c0725)+6) ))+9) ), (* (( (ptr) gf←c0724)+41) ), var←c59388, pd151)
         ;
         };
      };
   return(0);
   }

static void CreateViewer←P180(formal←c0910)
   word formal←c0910;
   {
   W8 var←c64988;
   /* declaration of tool←v7032 skipped */ 
   register ptr gf←c65020 =  (ptr) &globalframe;
   /* declaration of var←c59484 skipped */ 
   /* declaration of menu←v11112 skipped */ 
   word typeScript←v11140 = 0;
   var←c64988.f4/* tool←v7032 */  = formal←c0910;
   /* CreateViewer: */ 
SOURCE(4434, 30242)
   {
      word tmpAddr152;
      tmpAddr152 = (word) (( (ptr) &var←c64988)+5)/* var←c59484 */ ;
      (*  (ptr) tmpAddr152 ) = ( ((word)  (fPt) AddMenuEntry←P3420) );
      (* (( (ptr) tmpAddr152) + 1) ) = 1;
      };
SOURCE(4791, 37)
   {
      word pd153;
      pd153 = (* (( (ptr) (* (( (ptr) gf←c65020)+240)/* var←c59516 */  ))+4) );
      var←c64988.f7/* menu←v11112 */  = (word) ( *( (fPt) ((*  (ptr) pd153 ))))(1, pd153);
      };
SOURCE(4850, 29826)
   {
      word var←c59548;
      var←c59548 = (word) GetLabel←P240(var←c64988.f4/* tool←v7032 */ );
      {
         W28 var←c59580;
         W30 var←c0159;
         (*  (ptr) (word) &var←c0159 ) = (* (( (ptr) gf←c65020)+40) );
         XR←FillWords(&(* (W26Pt) (&var←c59580)), 26, 0);
         (* (( (ptr) &var←c59580)+13) ) = (* (( (ptr) var←c64988.f4/* tool←v7032 */ )+4) );
         (* (( (ptr) &var←c59580)+15) ) = var←c59548;
         (* (( (ptr) &var←c59580)+17) ) =  (word) -1;
         (* (( (ptr) &var←c59580)+18) ) = 2;
         (* (( (ptr) &var←c59580)+19) ) = 419430400;
         (* (( (ptr) &var←c59580)+26) ) = var←c64988.f4/* tool←v7032 */ ;
         (* (( (ptr) &var←c59580)+27) ) = 27;
         (*  (W28Pt) (( (ptr) (word) &var←c0159) + 1) ) = var←c59580;
         (* (( (ptr) (word) &var←c0159) + 29) ) = 0;
         {
            word pd154;
            pd154 = (* (( (ptr) (* (( (ptr) gf←c65020)+237)/* var←c59100 */  ))+6) );
            (* (( (ptr) var←c64988.f4/* tool←v7032 */ )+10) ) = (word) ( *( (fPt) ((*  (ptr) pd154 ))))((word) (&var←c0159), pd154);
            };
         };
      };
SOURCE(5065, 54)
   (void) AddMenuEntry←P3420((* (( (ptr) gf←c65020)+42) ), (word) (( (bPt) gf←c65020)+884)/* var←c58716 */ , 1, 0, 0, (word) (
         ( (bPt) &var←c64988)+20)/* var←c59484 */ );
SOURCE(5121, 49)
   (void) AddMenuEntry←P3420((* (( (ptr) gf←c65020)+43) ), (word) (( (bPt) gf←c65020)+876)/* var←c58684 */ , 0, 0, 0, (word) (
         ( (bPt) &var←c64988)+20)/* var←c59484 */ );
SOURCE(5172, 48)
   (void) AddMenuEntry←P3420((* (( (ptr) gf←c65020)+44) ), (word) (( (bPt) gf←c65020)+868)/* var←c58652 */ , 0, 0, 0, (word) (
         ( (bPt) &var←c64988)+20)/* var←c59484 */ );
SOURCE(5222, 50)
   (void) AddMenuEntry←P3420((* (( (ptr) gf←c65020)+45) ), (word) (( (bPt) gf←c65020)+860)/* var←c58620 */ , 0, 0, 0, (word) (
         ( (bPt) &var←c64988)+20)/* var←c59484 */ );
SOURCE(5274, 52)
   (void) AddMenuEntry←P3420((* (( (ptr) gf←c65020)+46) ), (word) (( (bPt) gf←c65020)+852)/* var←c58588 */ , 0, 0, 0, (word) (
         ( (bPt) &var←c64988)+20)/* var←c59484 */ );
SOURCE(5328, 58)
   (void) AddMenuEntry←P3420((* (( (ptr) gf←c65020)+47) ), (word) (( (bPt) gf←c65020)+844)/* var←c58556 */ , 1, 0, 0, (word) (
         ( (bPt) &var←c64988)+20)/* var←c59484 */ );
SOURCE(5388, 62)
   (void) AddMenuEntry←P3420((* (( (ptr) gf←c65020)+48) ), (word) (( (bPt) gf←c65020)+836)/* var←c58524 */ , 1, 0, 0, (word) (
         ( (bPt) &var←c64988)+20)/* var←c59484 */ );
SOURCE(5452, 72)
   (void) AddMenuEntry←P3420((* (( (ptr) gf←c65020)+49) ), (word) (( (bPt) gf←c65020)+828)/* var←c58492 */ , 1, 0, 0, (word) (
         ( (bPt) &var←c64988)+20)/* var←c59484 */ );
SOURCE(5526, 36)
   {
      word pd155;
      pd155 = (* (( (ptr) (* (( (ptr) gf←c65020)+237)/* var←c59100 */  ))+32) );
      (void) ( *( (fPt) ((*  (ptr) pd155 ))))((* (( (ptr) var←c64988.f4/* tool←v7032 */ )+10) ), var←c64988.f7/* menu←v11112 */ , 1, pd155)
      ;
      };
SOURCE(5564, 29112)
   {
      W28 var←c59612;
      W29 var←c0161;
      XR←FillWords(&(* (W27Pt) (&var←c59612)), 27, 0);
      (* (( (ptr) &var←c59612)+3) ) = 9999;
      (* (( (ptr) &var←c59612)+17) ) =  (word) -1;
      (* (( (ptr) &var←c59612)+18) ) = 1;
      (* (( (ptr) &var←c59612)+19) ) = 1358954496;
      (* (( (ptr) &var←c59612)+22) ) = (* (( (ptr) var←c64988.f4/* tool←v7032 */ )+10) );
      (* (( (ptr) &var←c59612)+27) ) = 27;
      (*  (W28Pt) (word) &var←c0161 ) = var←c59612;
      (* (( (ptr) (word) &var←c0161) + 28) ) = 0;
      {
         word pd156;
         pd156 = (* (( (ptr) (* (( (ptr) gf←c65020)+241)/* var←c59644 */  ))+4) );
         typeScript←v11140 = (word) ( *( (fPt) ((*  (ptr) pd156 ))))((word) (&var←c0161), pd156);
         };
      };
SOURCE(5686, 40)
   {
      word pd157;
      pd157 = (* (( (ptr) (* (( (ptr) gf←c65020)+242)/* var←c59676 */  ))+14) );
      (void) ( *( (fPt) ((*  (ptr) pd157 ))))(typeScript←v11140, pd157);
      };
SOURCE(5728, 74)
   (void) PlaceChild←P2760(typeScript←v11140, 4, 30,  (word) -1);
SOURCE(5804, 28872)
   {
      word var←c59708;
      W2 var←c0163;
      {
         word pd158;
         pd158 = (* (( (ptr) (* (( (ptr) gf←c65020)+238)/* var←c59164 */  ))+4) );
         (void) ( *( (fPt) ((*  (ptr) pd158 ))))((word) &var←c0163, 0, typeScript←v11140, 0, 1, 0, pd158);
         };
      var←c59708 = var←c0163.f1;
      (* (( (ptr) var←c64988.f4/* tool←v7032 */ )+9) ) = var←c59708;
      };
SOURCE(5885, 39)
   {
      word pd159;
      pd159 = (* (( (ptr) (* (( (ptr) gf←c65020)+237)/* var←c59100 */  ))+16) );
      (void) ( *( (fPt) ((*  (ptr) pd159 ))))((* (( (ptr) var←c64988.f4/* tool←v7032 */ )+10) ), 0, 1, 0, pd159);
      };
   }

static void AddMenuEntry←P3420(name←v11216, proc←v11244, fork←v11272, row←v11300, guardDoc←v11328, formal←c65084)
   word name←v11216;
   word proc←v11244;
   word fork←v11272;
   word row←v11300;
   word guardDoc←v11328;
   word formal←c65084;
   {
   register ptr gf←c65052 =  (ptr) &globalframe;
   word menuEntry←v11356;
   formal←c65084 = (formal←c65084 - 20);
   /* AddMenuEntry: */ 
SOURCE(4470, 30206)
SOURCE(4593, 148)
   {
      word pd160;
      pd160 = (* (( (ptr) (* (( (ptr) gf←c65052)+240)/* var←c59516 */  ))+6) );
      menuEntry←v11356 = (word) ( *( (fPt) ((*  (ptr) pd160 ))))(name←v11216, proc←v11244, (* (( (ptr) formal←c65084)+4) ), guardDoc←v11328, fork←v11272, (guardDoc←v11328 != 0), pd160)
      ;
      };
SOURCE(4743, 43)
   {
      word pd161;
      pd161 = (* (( (ptr) (* (( (ptr) gf←c65052)+240)/* var←c59516 */  ))+12) );
      (void) ( *( (fPt) ((*  (ptr) pd161 ))))((* (( (ptr) formal←c65084)+7) ), menuEntry←v11356, BCK(row←v11300, 5), pd161);
      };
   }

static word GetLabel←P240(tool←v7092)
   word tool←v7092;
   {
   register ptr gf←c65116 =  (ptr) &globalframe;
   word label←v7136;
   word name←v11400;
   /* GetLabel: */ 
SOURCE(5930, 28746)
SOURCE(5930, 28746)
   label←v7136 = 0;
SOURCE(5984, 29)
   name←v11400 = (* (( (ptr) tool←v7092)+4) );
SOURCE(6015, 28661)
   {
      word var←c59772;
      {
         word pd162;
         pd162 = (* (( (ptr) (* (( (ptr) gf←c65116)+235)/* var←c59004 */  ))+10) );
         var←c59772 = (word) ( *( (fPt) ((*  (ptr) pd162 ))))(name←v11400, 0, (* (( (ptr) gf←c65116)+50) ), 1, pd162);
         };
      {
         word pd163;
         pd163 = (* (( (ptr) (* (( (ptr) gf←c65116)+235)/* var←c59004 */  ))+17) );
         return((word) ( *( (fPt) ((*  (ptr) pd163 ))))(name←v11400, 0, var←c59772, pd163));
         };
      };
   }

static void DestroyTool←P300(formal←c0911)
   word formal←c0911;
   {
   W5 var←c65148;
   /* declaration of tool←v7196 skipped */ 
   var←c65148.f4/* tool←v7196 */  = formal←c0911;
   /* DestroyTool: */ 
SOURCE(6065, 107)
   (void) (XR←MonitorEntry(var←c65148.f4/* tool←v7196 */ ));
SOURCE(6113, 59)
   {
      word var←c0830;
      var←c0830 = (word) &var←c65148;
       (void) (word) XR←Enable(( ((word)  (fPt) NoName←Q6012) ), ( ((word)  (fPt) NoName←Q8232) ), var←c0830);
      };
SOURCE(6065, 107)
   (void) (XR←MonitorExit(var←c65148.f4/* tool←v7196 */ ));
   return;
   }

static word NoName←Q6012(formal←c0731)
   word formal←c0731;
   {
   register ptr gf←c0730 =  (ptr) &globalframe;
SOURCE(6136, 36)
   {
      word pd164;
      pd164 = (* (( (ptr) (* (( (ptr) gf←c0730)+237)/* var←c59100 */  ))+15) );
      (void) ( *( (fPt) ((*  (ptr) pd164 ))))((* (( (ptr) (* (( (ptr) formal←c0731)+4) ))+10) ), 1, pd164);
      };
   return(0);
   }

static void NewButton←P360(parent←v43004, clientData←v43032, mouseButton←v43060, shift←v43088, control←v43116)
   word parent←v43004;
   word clientData←v43032;
   word mouseButton←v43060;
   word shift←v43088;
   word control←v43116;
   {
   W7 var←c65180;
   register ptr gf←c65212 =  (ptr) &globalframe;
   word tool←v11444;
   /* declaration of printer←v11472 skipped */ 
   /* NewButton: */ 
SOURCE(6177, 28499)
SOURCE(6207, 31)
   tool←v11444 = XR←Narrow(clientData←v43032, (* (( (ptr) gf←c65212)+16) ));
SOURCE(6240, 50)
   {
      word pd165;
      pd165 = (* (( (ptr) (* (( (ptr) gf←c65212)+242)/* var←c59676 */  ))+8) );
      var←c65180.f4/* printer←v11472 */  = (word) ( *( (fPt) ((*  (ptr) pd165 ))))(pd165);
      };
SOURCE(6292, 28384)
   {
      word pd166;
      pd166 = (* (( (ptr) (* (( (ptr) gf←c65212)+235)/* var←c59004 */  ))+13) );
      if ((0 == (word) ( *( (fPt) ((*  (ptr) pd166 ))))(var←c65180.f4/* printer←v11472 */ , pd166))) {
SOURCE(6323, 28353)
SOURCE(6323, 28353)
         {
            word var←c59804;
            {
               /* declaration of var←c01 skipped */ 
               var←c65180.f5/* var←c01 */  = (* (( (ptr) tool←v11444)+9) );
               {
                  /* declaration of var←c02 skipped */ 
                  {
                     word var←c03;
                     {
                        word var←c0831;
                        var←c0831 = (word) &var←c65180;
                        var←c03 = (word) XR←Enable(( ((word)  (fPt) NoName←Q6072) ), ( ((word)  (fPt) NoName←Q8172) ), var←c0831);
                        };
                     if ((var←c03 == 2)) {
                        goto lab←L100006;
                        };
                     };
                  var←c59804 = var←c65180.f6/* var←c02 */ ;
                  };
               };
            };
         lab←L100006: ;
         };
      };
   }

static word NoName←Q6072(formal←c0733)
   word formal←c0733;
   {
SOURCE(6323, 28353)
   (* (( (ptr) formal←c0733)+6) ) = (word) NewTool←P120((* (( (ptr) formal←c0733)+4) ), (* (( (ptr) formal←c0733)+5) ));
   return(0);
   }

static void LeftScreenButton←P420(parent←v43176, clientData←v43204, mouseButton←v43232, shift←v43260, control←v43288)
   word parent←v43176;
   word clientData←v43204;
   word mouseButton←v43232;
   word shift←v43260;
   word control←v43288;
   {
   register ptr gf←c65244 =  (ptr) &globalframe;
   word tool←v11516;
   /* LeftScreenButton: */ 
SOURCE(6385, 102)
SOURCE(6422, 31)
   tool←v11516 = XR←Narrow(clientData←v43204, (* (( (ptr) gf←c65244)+16) ));
SOURCE(6455, 32)
   {
      word pd167;
      pd167 = (* (( (ptr) (* (( (ptr) gf←c65244)+243)/* var←c59836 */  ))+19) );
      (void) ( *( (fPt) ((*  (ptr) pd167 ))))(tool←v11516, 1, 0, pd167);
      };
   }

static void ScreenButton←P480(parent←v43348, clientData←v43376, mouseButton←v43404, shift←v43432, control←v43460)
   word parent←v43348;
   word clientData←v43376;
   word mouseButton←v43404;
   word shift←v43432;
   word control←v43460;
   {
   register ptr gf←c65276 =  (ptr) &globalframe;
   word tool←v11560;
   /* ScreenButton: */ 
SOURCE(6493, 96)
SOURCE(6526, 31)
   tool←v11560 = XR←Narrow(clientData←v43376, (* (( (ptr) gf←c65276)+16) ));
SOURCE(6559, 30)
   {
      word pd168;
      pd168 = (* (( (ptr) (* (( (ptr) gf←c65276)+243)/* var←c59836 */  ))+19) );
      (void) ( *( (fPt) ((*  (ptr) pd168 ))))(tool←v11560, 0, 0, pd168);
      };
   }

static void RightScreenButton←P540(parent←v43520, clientData←v43548, mouseButton←v43576, shift←v43604, control←v43632)
   word parent←v43520;
   word clientData←v43548;
   word mouseButton←v43576;
   word shift←v43604;
   word control←v43632;
   {
   register ptr gf←c65308 =  (ptr) &globalframe;
   word tool←v11604;
   /* RightScreenButton: */ 
SOURCE(6595, 104)
SOURCE(6633, 31)
   tool←v11604 = XR←Narrow(clientData←v43548, (* (( (ptr) gf←c65308)+16) ));
SOURCE(6666, 33)
   {
      word pd169;
      pd169 = (* (( (ptr) (* (( (ptr) gf←c65308)+243)/* var←c59836 */  ))+19) );
      (void) ( *( (fPt) ((*  (ptr) pd169 ))))(tool←v11604, 2, 0, pd169);
      };
   }

static void ColorScreenButton←P600(parent←v43692, clientData←v43720, mouseButton←v43748, shift←v43776, control←v43804)
   word parent←v43692;
   word clientData←v43720;
   word mouseButton←v43748;
   word shift←v43776;
   word control←v43804;
   {
   register ptr gf←c65340 =  (ptr) &globalframe;
   word tool←v11648;
   /* ColorScreenButton: */ 
SOURCE(6705, 215)
SOURCE(6743, 31)
   tool←v11648 = XR←Narrow(clientData←v43720, (* (( (ptr) gf←c65340)+16) ));
SOURCE(6776, 144)
   if ((0 != (*  (ptr) (* (( (ptr) (* (( (ptr) gf←c65340)+244)/* var←c59868 */  ))+10) ) ))) {
SOURCE(6813, 39)
      {
         word pd170;
         pd170 = (* (( (ptr) (* (( (ptr) gf←c65340)+243)/* var←c59836 */  ))+19) );
         (void) ( *( (fPt) ((*  (ptr) pd170 ))))(tool←v11648, 3, 0, pd170);
         };
      }
   else {
SOURCE(6852, 68)
      {
         word pd171;
         pd171 = (* (( (ptr) (* (( (ptr) gf←c65340)+239)/* var←c59292 */  ))+93) );
         (void) ( *( (fPt) ((*  (ptr) pd171 ))))((* (( (ptr) tool←v11648)+9) ), (* (( (ptr) gf←c65340)+51) ), 0, 2147483647, pd171)
         ;
         };
      };
   }

static void PrintButton←P660(parent←v43864, clientData←v43892, mouseButton←v43920, shift←v43948, control←v43976)
   word parent←v43864;
   word clientData←v43892;
   word mouseButton←v43920;
   word shift←v43948;
   word control←v43976;
   {
   W13 var←c65372;
   register ptr gf←c65404 =  (ptr) &globalframe;
   /* declaration of var←c59900 skipped */ 
   /* declaration of var←c59932 skipped */ 
   /* declaration of var←c59964 skipped */ 
   /* PrintButton: */ 
SOURCE(6926, 27750)
   {
      word tmpAddr172;
      tmpAddr172 = (word) (( (ptr) &var←c65372)+4)/* var←c59900 */ ;
      (*  (ptr) tmpAddr172 ) = ( ((word)  (fPt) InvalidFile←P3648) );
      (* (( (ptr) tmpAddr172) + 1) ) = 1;
      };
   {
      word tmpAddr173;
      tmpAddr173 = (word) (( (ptr) &var←c65372)+6)/* var←c59932 */ ;
      (*  (ptr) tmpAddr173 ) = ( ((word)  (fPt) FileFromHint←P3588) );
      (* (( (ptr) tmpAddr173) + 1) ) = 1;
      };
   {
      word tmpAddr174;
      tmpAddr174 = (word) (( (ptr) &var←c65372)+8)/* var←c59964 */ ;
      (*  (ptr) tmpAddr174 ) = ( ((word)  (fPt) FileNameSelected←P3528) );
      (* (( (ptr) tmpAddr174) + 1) ) = 1;
      };
SOURCE(6956, 27720)
SOURCE(6958, 24)
   {
      /* declaration of tool←v11776 skipped */ 
      word curSel←v11804;
      word curViewer←v11832;
SOURCE(7882, 31)
      (* (( (ptr) &var←c65372)+10)/* tool←v11776 */  ) = XR←Narrow(clientData←v43892, (* (( (ptr) gf←c65404)+16) ));
SOURCE(7915, 49)
      {
         word pd175;
         pd175 = (* (( (ptr) (* (( (ptr) gf←c65404)+242)/* var←c59676 */  ))+8) );
         curSel←v11804 = (word) ( *( (fPt) ((*  (ptr) pd175 ))))(pd175);
         };
SOURCE(7966, 51)
      {
         word pd176;
         pd176 = (* (( (ptr) (* (( (ptr) gf←c65404)+242)/* var←c59676 */  ))+7) );
         curViewer←v11832 = (word) ( *( (fPt) ((*  (ptr) pd176 ))))(pd176);
         };
      if ((0 != (word) FileNameSelected←P3528(curSel←v11804, (word) (( (bPt) &var←c65372)+32)/* var←c59964 */ ))) {
SOURCE(8064, 177)
         {
            /* declaration of fName←v12172 skipped */ 
SOURCE(8098, 45)
            (* (( (ptr) &var←c65372)+11)/* fName←v12172 */  ) = (word) FileFromHint←P3588(curSel←v11804, curViewer←v11832, (word) (( (bPt) &var←c65372)+24)
               /* var←c59932 */ );
SOURCE(8145, 78)
            {
               /* declaration of var←c04 skipped */ 
               (* (( (ptr) &var←c65372)+12)/* var←c04 */  ) = (* (( (ptr) (* (( (ptr) gf←c65404)+243)/* var←c59836 */  ))+17) );
               {
                  word var←c05;
                  {
                     word var←c0832;
                     var←c0832 = (word) &var←c65372;
                     var←c05 = (word) XR←Enable(( ((word)  (fPt) NoName←Q6132) ), ( ((word)  (fPt) NoName←Q8112) ), var←c0832);
                     };
                  if ((var←c05 == 3)) {
                     goto lab←L100009;
                     };
                  };
               };
            };
         }
      else {
         if ((curViewer←v11832 != 0)) {
SOURCE(8281, 37)
            {
               word pd177;
               pd177 = (* (( (ptr) (* (( (ptr) gf←c65404)+243)/* var←c59836 */  ))+18) );
               (void) ( *( (fPt) ((*  (ptr) pd177 ))))((* (( (ptr) &var←c65372)+10)/* tool←v11776 */  ), curViewer←v11832, 0, pd177);
               };
            }
         else {
SOURCE(8364, 66)
            {
               word pd178;
               pd178 = (* (( (ptr) (* (( (ptr) gf←c65404)+239)/* var←c59292 */  ))+93) );
               (void) ( *( (fPt) ((*  (ptr) pd178 ))))((* (( (ptr) (* (( (ptr) &var←c65372)+10)/* tool←v11776 */  ))+9) ), (* (( (ptr) gf←c65404)+52)
                   ), 0, 2147483647, pd178);
               };
            };
         };
      };
   goto lab←L100012;
   lab←L100009: ;
   lab←L100012: ;
   }

static word NoName←Q6132(formal←c0739)
   word formal←c0739;
   {
SOURCE(8145, 78)
   {
      word pd179;
      pd179 = (* (( (ptr) formal←c0739)+12) );
      (void) ( *( (fPt) ((*  (ptr) pd179 ))))((* (( (ptr) formal←c0739)+10) ), (* (( (ptr) formal←c0739)+11) ), 0, pd179);
      };
   return(0);
   }

static word FileNameSelected←P3528(self←v11908, formal←c65468)
   word self←v11908;
   word formal←c65468;
   {
   register ptr gf←c65436 =  (ptr) &globalframe;
   word var←c11952;
   word length←v12216;
   formal←c65468 = (formal←c65468 - 32);
   /* FileNameSelected: */ 
SOURCE(6958, 24)
SOURCE(7013, 27)
   {
      word pd180;
      pd180 = (* (( (ptr) (* (( (ptr) gf←c65436)+235)/* var←c59004 */  ))+14) );
      length←v12216 = (word) ( *( (fPt) ((*  (ptr) pd180 ))))(self←v11908, pd180);
      };
SOURCE(7042, 33)
   if (( (int)length←v12216 <  (int)2)) {
SOURCE(7061, 14)
      return(0);
      };
SOURCE(7098, 27578)
   {
      word pd181;
      pd181 = (* (( (ptr) (* (( (ptr) gf←c65436)+235)/* var←c59004 */  ))+24) );
      if (( (int)(word) ( *( (fPt) ((*  (ptr) pd181 ))))(self←v11908, 0, (* (( (ptr) gf←c65436)+53) ), pd181) !=  (int)length←v12216)) {
SOURCE(7149, 14)
         return(0);
         };
      };
SOURCE(7187, 13)
   return(1);
   }

static word FileFromHint←P3588(formal←c0912, formal←c0913, formal←c65532)
   word formal←c0912;
   word formal←c0913;
   word formal←c65532;
   {
   W8 var←c65500;
   /* declaration of hint←v12012 skipped */ 
   /* declaration of v←v12040 skipped */ 
   /* declaration of var←c06 skipped */ 
   /* declaration of fName←v12084 skipped */ 
   formal←c65532 = (formal←c65532 - 24);
   var←c65500.f4/* hint←v12012 */  = formal←c0912;
   var←c65500.f5/* v←v12040 */  = formal←c0913;
   var←c65500.f0 = formal←c65532;
   /* FileFromHint: */ 
SOURCE(7218, 20)
SOURCE(7218, 20)
   var←c65500.f7/* fName←v12084 */  = 0;
SOURCE(7285, 27391)
SOURCE(7287, 27389)
   {
      word var←c07;
      {
         word var←c0833;
         var←c0833 = (word) &var←c65500;
         var←c07 = (word) XR←Enable(( ((word)  (fPt) NoName←Q6192) ), ( ((word)  (fPt) NoName←Q8052) ), var←c0833);
         };
      if ((var←c07 == 4)) {
         goto lab←L100013;
         }
      else {
         if ((var←c07 == 1)) {
            goto lab←L06;
            };
         };
      };
   goto lab←L100016;
   lab←L100013: ;
SOURCE(7769, 12)
   var←c65500.f7/* fName←v12084 */  = var←c65500.f4/* hint←v12012 */ ;
   lab←L100016: ;
SOURCE(7218, 20)
   return(var←c65500.f7/* fName←v12084 */ );
   lab←L06: ;
   return(var←c65500.f6/* var←c06 */ );
   }

static word NoName←Q6192(formal←c0744)
   word formal←c0744;
   {
   register ptr gf←c0743 =  (ptr) &globalframe;
SOURCE(7321, 11)
   {
      word ctxFN←v12260 = 0;
      W4 var←c0228;
SOURCE(7334, 34)
      if (((* (( (ptr) formal←c0744)+5) ) == 0)) {
SOURCE(7348, 20)
         (* (( (ptr) formal←c0744)+6) ) = (* (( (ptr) formal←c0744)+4) );
         return(1);
         };
SOURCE(7384, 14)
      ctxFN←v12260 = (* (( (ptr) (* (( (ptr) formal←c0744)+5) ))+14) );
SOURCE(7400, 27276)
      {
         word tc182;
         word pd183;
         pd183 = (* (( (ptr) (* (( (ptr) gf←c0743)+235)/* var←c59004 */  ))+13) );
         if ((0 != (word) ( *( (fPt) ((*  (ptr) pd183 ))))(ctxFN←v12260, pd183))) {
            tc182 =  (word) ((* (( (ptr) (* (( (ptr) formal←c0744)+5) ))+13) ) != 0);
            }
         else {
            tc182 =  (word) 0;
            };
         if (tc182) {
            {
               W14 var←c0227;
SOURCE(7474, 27202)
               {
                  word var←c60028;
                  {
                     word pd184;
                     pd184 = (* (( (ptr) (* (( (ptr) gf←c0743)+235)/* var←c59004 */  ))+24) );
                     var←c60028 = (word) ( *( (fPt) ((*  (ptr) pd184 ))))((* (( (ptr) (* (( (ptr) formal←c0744)+5) ))+13) ), 0, (* (( (ptr) gf←c0743)+54)
                         ), pd184);
                     };
                  {
                     word pd185;
                     pd185 = (* (( (ptr) (* (( (ptr) gf←c0743)+235)/* var←c59004 */  ))+17) );
                     ctxFN←v12260 = (word) ( *( (fPt) ((*  (ptr) pd185 ))))((* (( (ptr) (* (( (ptr) formal←c0744)+5) ))+13) ), 0, var←c60028, pd185)
                     ;
                     };
                  };
SOURCE(7535, 27141)
               {
                  word pd186;
                  pd186 = (* (( (ptr) (* (( (ptr) gf←c0743)+243)/* var←c59836 */  ))+10) );
                  (void) ( *( (fPt) ((*  (ptr) pd186 ))))((word) &var←c0227, (* (( (ptr) gf←c0743)+55) ), ctxFN←v12260, pd186);
                  };
               ctxFN←v12260 = (*  (ptr) &var←c0227 );
               };
            };
         };
SOURCE(7599, 27077)
      {
         word pd187;
         pd187 = (* (( (ptr) (* (( (ptr) gf←c0743)+246)/* var←c60060 */  ))+4) );
         (void) ( *( (fPt) ((*  (ptr) pd187 ))))((word) &var←c0228, (* (( (ptr) formal←c0744)+4) ), ctxFN←v12260, 0, 1, pd187);
         };
      (* (( (ptr) formal←c0744)+7) ) = var←c0228.f0;
SOURCE(7711, 26965)
      {
         word pd188;
         pd188 = (* (( (ptr) (* (( (ptr) gf←c0743)+235)/* var←c59004 */  ))+13) );
         if ((0 != (word) ( *( (fPt) ((*  (ptr) pd188 ))))((* ((( (ptr) formal←c0744)+7)) ), pd188))) {
SOURCE(7739, 12)
            (* (( (ptr) formal←c0744)+7) ) = (* (( (ptr) formal←c0744)+4) );
            };
         };
      };
   return(0);
   }

static void InvalidFile←P3648(why←v12144, formal←c65596)
   word why←v12144;
   word formal←c65596;
   {
   register ptr gf←c65564 =  (ptr) &globalframe;
   formal←c65596 = (formal←c65596 - 16);
   /* InvalidFile: */ 
SOURCE(7786, 19)
SOURCE(7820, 26856)
   {
      W2 var←c60092;
      var←c60092.f0 = 11;
      var←c60092.f1 = why←v12144;
      {
         word pd189;
         pd189 = (* (( (ptr) (* (( (ptr) gf←c65564)+239)/* var←c59292 */  ))+61) );
         (void) ( *( (fPt) ((*  (ptr) pd189 ))))((* (( (ptr) (* (( (ptr) formal←c65596)+10) ))+9) ), (* (( (ptr) gf←c65564)+56) ), var←c60092, pd189)
         ;
         };
      };
   }

static void OptionsButton←P720(parent←v44036, clientData←v44064, mouseButton←v44092, shift←v44120, control←v44148)
   word parent←v44036;
   word clientData←v44064;
   word mouseButton←v44092;
   word shift←v44120;
   word control←v44148;
   {
   register ptr gf←c65628 =  (ptr) &globalframe;
   word tool←v12304;
   /* OptionsButton: */ 
SOURCE(8461, 187)
SOURCE(8495, 31)
   tool←v12304 = XR←Narrow(clientData←v44064, (* (( (ptr) gf←c65628)+16) ));
SOURCE(8528, 120)
   if (((* (( (ptr) tool←v12304)+12) ) == 0) || (* (( (bPt) (* (( (ptr) tool←v12304)+12) ))+77) ) & 0100) {
SOURCE(8591, 31)
      (void) CreateOptionsViewer←P1860(tool←v12304);
      }
   else {
SOURCE(8622, 26)
      (void) DestroyOptionsViewer←P1920(tool←v12304);
      };
   }

static void ServerStatusButton←P780(parent←v44208, clientData←v44236, mouseButton←v44264, shift←v44292, control←v44320)
   word parent←v44208;
   word clientData←v44236;
   word mouseButton←v44264;
   word shift←v44292;
   word control←v44320;
   {
   register ptr gf←c65660 =  (ptr) &globalframe;
   word tool←v12348;
   /* ServerStatusButton: */ 
SOURCE(8654, 214)
SOURCE(8693, 31)
   tool←v12348 = XR←Narrow(clientData←v44236, (* (( (ptr) gf←c65660)+16) ));
SOURCE(8726, 142)
   if (((* (( (ptr) tool←v12348)+24) ) == 0) || (* (( (bPt) (* (( (ptr) tool←v12348)+24) ))+77) ) & 0100) {
SOURCE(8801, 36)
      (void) CreateServerStatusViewer←P2280(tool←v12348);
      }
   else {
SOURCE(8837, 31)
      (void) DestroyServerStatusViewer←P2340(tool←v12348);
      };
   }

static void CreateBoolButton←P840(formal←c0254, name←v7328, parent←v7356, pos←v7384, init←v7412, possible←v7440, click←v7468)
   word formal←c0254;
   word name←v7328;
   word parent←v7356;
   W2 pos←v7384;
   word init←v7412;
   word possible←v7440;
   word click←v7468;
   {
   register ptr gf←c65692 =  (ptr) &globalframe;
   word state←v7512;
   word newx←v7540;
   /* CreateBoolButton: */ 
SOURCE(8971, 25705)
SOURCE(8971, 25705)
   state←v7512 = 0;
SOURCE(9133, 25543)
   {
      word var←c60124;
      var←c60124 = XR←NewObject(16, (* (( (ptr) gf←c65692)+34) ));
      if ((0 != possible←v7440)) {
         (* (( (ptr) var←c60124)+2) ) = (* (( (ptr) gf←c65692)+58) );
         }
      else {
         (* (( (ptr) var←c60124)+2) ) = (* (( (ptr) gf←c65692)+59) );
         };
      (* (( (ptr) var←c60124)+3) ) = XR←CheckProc(click←v7468);
      state←v7512 = var←c60124;
      };
SOURCE(9234, 25442)
   {
      W28 var←c60156;
      W35 var←c0253;
      XR←FillWords(&(* (W27Pt) (&var←c60156)), 27, 0);
      (* (( (ptr) &var←c60156)+1) ) = pos←v7384.f0;
      (* (( (ptr) &var←c60156)+2) ) = pos←v7384.f1;
      (* (( (ptr) &var←c60156)+13) ) = name←v7328;
      (* (( (ptr) &var←c60156)+17) ) =  (word) -1;
      (* (( (ptr) &var←c60156)+18) ) = 1;
      (* (( (ptr) &var←c60156)+19) ) = 1493172224;
      (* (( (ptr) &var←c60156)+22) ) = parent←v7356;
      (* (( (ptr) &var←c60156)+27) ) = 27;
      (*  (W28Pt) (word) &var←c0253 ) = var←c60156;
      (* (( (ptr) (word) &var←c0253) + 28) ) = (word) (( (bPt) gf←c65692)+812)/* var←c58428 */ ;
      (* (( (ptr) (word) &var←c0253) + 29) ) = state←v7512;
      (* (( (ptr) (word) &var←c0253) + 30) ) = 0;
      (* (( (ptr) (word) &var←c0253) + 31) ) = 0;
      (* (( (ptr) (word) &var←c0253) + 32) ) = 0;
      (* (( (ptr) (word) &var←c0253) + 33) ) = 0;
      (* (( (ptr) (word) &var←c0253) + 34) ) = 0;
      {
         word pd190;
         pd190 = (* (( (ptr) (* (( (ptr) gf←c65692)+247)/* var←c60188 */  ))+4) );
         (*  (ptr) state←v7512 ) = (word) ( *( (fPt) ((*  (ptr) pd190 ))))((word) (&var←c0253), pd190);
         };
      };
SOURCE(9407, 44)
   newx←v7540 = ((pos←v7384.f0 + (* (( (ptr) (*  (ptr) state←v7512 ))+3) )) + (* (( (ptr) gf←c65692)+12)/* entryHSpace←v4876 */  ));
SOURCE(9453, 39)
   (void) SetBoolButton←P1020(state←v7512, ((0 != init←v7412) && (0 != possible←v7440)));
   /* removed tail goto */ 
   (*  (ptr) formal←c0254 ) = state←v7512;
   (* (( (ptr) formal←c0254)+1) ) = newx←v7540;
   return;
   }

static void ClickBoolButton←P900(parent←v44380, clientData←v44408, mouseButton←v44436, shift←v44464, control←v44492)
   word parent←v44380;
   word clientData←v44408;
   word mouseButton←v44436;
   word shift←v44464;
   word control←v44492;
   {
   register ptr gf←c65724 =  (ptr) &globalframe;
   word state←v12392;
   /* ClickBoolButton: */ 
SOURCE(9498, 161)
SOURCE(9538, 39)
   state←v12392 = XR←Narrow(clientData←v44408, (* (( (ptr) gf←c65724)+34) ));
SOURCE(9579, 36)
   (void) SetBoolButton←P1020(state←v12392, (0 == (* (( (ptr) state←v12392)+1) )));
SOURCE(9617, 42)
   if (((* (( (ptr) state←v12392)+3) ) != 0)) {
SOURCE(9641, 18)
      {
         word pd191;
         pd191 = (* (( (ptr) state←v12392)+3) );
         (void) ( *( (fPt) ((*  (ptr) pd191 ))))(state←v12392, pd191);
         };
      };
   }

static word GetBoolButton←P960(state←v7600)
   word state←v7600;
   {
   word var←c7644;
   /* GetBoolButton: */ 
SOURCE(9665, 78)
SOURCE(9724, 19)
   return((* (( (ptr) state←v7600)+1) ));
   }

static void SetBoolButton←P1020(state←v7704, value←v7732)
   word state←v7704;
   word value←v7732;
   {
   register ptr gf←c65756 =  (ptr) &globalframe;
   /* SetBoolButton: */ 
SOURCE(9749, 163)
SOURCE(9805, 18)
   (* (( (ptr) state←v7704)+1) ) = value←v7732;
SOURCE(9825, 87)
   {
      word pd192;
      pd192 = (* (( (ptr) (* (( (ptr) gf←c65756)+247)/* var←c60188 */  ))+7) );
      (void) ( *( (fPt) ((*  (ptr) pd192 ))))((*  (ptr) state←v7704 ),  ( (0 != value←v7732) ? (* (( (ptr) state←v7704)+2) ) : (* (
            ( (ptr) gf←c65756)+60) ) ) , 1, pd192);
      };
   }

static void CreateIntButton←P1080(formal←c0281, name←v7792, parent←v7820, pos←v7848, w←v7876, default←v7904, defined←v7932, init←v7960)
   word formal←c0281;
   word name←v7792;
   word parent←v7820;
   W2 pos←v7848;
   word w←v7876;
   word default←v7904;
   word defined←v7932;
   word init←v7960;
   {
   register ptr gf←c65788 =  (ptr) &globalframe;
   word state←v8004;
   word newx←v8032;
   /* CreateIntButton: */ 
SOURCE(9918, 24758)
SOURCE(9918, 24758)
   state←v8004 = 0;
SOURCE(10087, 24589)
   {
      word var←c60220;
      var←c60220 = XR←NewObject(12, (* (( (ptr) gf←c65788)+32) ));
      (* (( (ptr) var←c60220)+1) ) = default←v7904;
      state←v8004 = var←c60220;
      };
SOURCE(10136, 24540)
   {
      W28 var←c60252;
      W35 var←c0276;
      XR←FillWords(&(* (W27Pt) (&var←c60252)), 27, 0);
      (* (( (ptr) &var←c60252)+1) ) = pos←v7848.f0;
      (* (( (ptr) &var←c60252)+2) ) = pos←v7848.f1;
      (* (( (ptr) &var←c60252)+13) ) = name←v7792;
      (* (( (ptr) &var←c60252)+17) ) =  (word) -1;
      (* (( (ptr) &var←c60252)+18) ) = 1;
      (* (( (ptr) &var←c60252)+19) ) = 1358954496;
      (* (( (ptr) &var←c60252)+22) ) = parent←v7820;
      (* (( (ptr) &var←c60252)+27) ) = 27;
      (*  (W28Pt) (word) &var←c0276 ) = var←c60252;
      (* (( (ptr) (word) &var←c0276) + 28) ) = (word) (( (bPt) gf←c65788)+764)/* var←c58236 */ ;
      (* (( (ptr) (word) &var←c0276) + 29) ) = state←v8004;
      (* (( (ptr) (word) &var←c0276) + 30) ) = 0;
      (* (( (ptr) (word) &var←c0276) + 31) ) = 0;
      (* (( (ptr) (word) &var←c0276) + 32) ) = 0;
      (* (( (ptr) (word) &var←c0276) + 33) ) = 0;
      (* (( (ptr) (word) &var←c0276) + 34) ) = 0;
      {
         word pd193;
         pd193 = (* (( (ptr) (* (( (ptr) gf←c65788)+247)/* var←c60188 */  ))+4) );
         (*  (ptr) state←v8004 ) = (word) ( *( (fPt) ((*  (ptr) pd193 ))))((word) (&var←c0276), pd193);
         };
      };
SOURCE(10310, 24366)
   {
      word var←c60284;
      word var←c60316;
      var←c60284 = (pos←v7848.f0 + (* (( (ptr) (*  (ptr) state←v8004 ))+3) ));
      var←c60316 = (pos←v7848.f1 + (* (( (ptr) gf←c65788)+14)/* textFuzz←v4932 */  ));
      pos←v7848.f0 = var←c60284;
      pos←v7848.f1 = var←c60316;
      };
SOURCE(10394, 24282)
   {
      W28 var←c60348;
      W29 var←c0280;
      XR←FillWords(&(* (W27Pt) (&var←c60348)), 27, 0);
      (* (( (ptr) &var←c60348)+1) ) = pos←v7848.f0;
      (* (( (ptr) &var←c60348)+2) ) = pos←v7848.f1;
      (* (( (ptr) &var←c60348)+3) ) = w←v7876;
      (* (( (ptr) &var←c60348)+4) ) = (* (( (ptr) (*  (ptr) state←v8004 ))+4) );
      (* (( (ptr) &var←c60348)+17) ) =  (word) -1;
      (* (( (ptr) &var←c60348)+18) ) = 1;
      (* (( (ptr) &var←c60348)+19) ) = 1358954496;
      (* (( (ptr) &var←c60348)+22) ) = parent←v7820;
      (* (( (ptr) &var←c60348)+27) ) = 27;
      (*  (W28Pt) (word) &var←c0280 ) = (var←c60348
      );
      (* (( (ptr) (word) &var←c0280) + 28) ) = 0;
      {
         word pd194;
         pd194 = (* (( (ptr) (* (( (ptr) gf←c65788)+242)/* var←c59676 */  ))+5) );
         (* (( (ptr) state←v8004)+2) ) = (word) ( *( (fPt) ((*  (ptr) pd194 ))))((word) (&var←c0280), pd194);
         };
      };
SOURCE(10542, 16)
   newx←v8032 = (pos←v7848.f0 + w←v7876);
SOURCE(10560, 34)
   (void) SetIntButton←P1200(state←v8004, defined←v7932, init←v7960);
   /* removed tail goto */ 
   (*  (ptr) formal←c0281 ) = state←v8004;
   (* (( (ptr) formal←c0281)+1) ) = newx←v8032;
   return;
   }

static word GetIntButton←P1140(state←v8092)
   word state←v8092;
   {
   W7 var←c65820;
   register ptr gf←c65852 =  (ptr) &globalframe;
   word val←v8136;
   /* GetIntButton: */ 
SOURCE(10600, 24076)
SOURCE(10661, 19)
   val←v8136 = (* (( (ptr) state←v8092)+1) );
SOURCE(10682, 23994)
SOURCE(10682, 23994)
   {
      /* declaration of var←c60380 skipped */ 
      {
         word pd195;
         pd195 = (* (( (ptr) (* (( (ptr) gf←c65852)+242)/* var←c59676 */  ))+10) );
         var←c65820.f4/* var←c60380 */  = (word) ( *( (fPt) ((*  (ptr) pd195 ))))((* ((( (ptr) state←v8092)+2)) ), pd195);
         };
      {
         /* declaration of var←c08 skipped */ 
         var←c65820.f5/* var←c08 */  = (* (( (ptr) (* (( (ptr) gf←c65852)+248)/* var←c60412 */  ))+10) );
         {
            /* declaration of var←c09 skipped */ 
            {
               word var←c010;
               {
                  word var←c0834;
                  var←c0834 = (word) &var←c65820;
                  var←c010 = (word) XR←Enable(( ((word)  (fPt) NoName←Q6252) ), ( ((word)  (fPt) NoName←Q7992) ), var←c0834);
                  };
               if ((var←c010 == 5)) {
                  goto lab←L100020;
                  };
               };
            val←v8136 = var←c65820.f6/* var←c09 */ ;
            };
         };
      };
   lab←L100020: ;
SOURCE(10600, 24076)
   return(val←v8136);
   }

static word NoName←Q6252(formal←c0754)
   word formal←c0754;
   {
SOURCE(10682, 23994)
   {
      word pd196;
      pd196 = (* (( (ptr) formal←c0754)+5) );
      (* (( (ptr) formal←c0754)+6) ) = (word) ( *( (fPt) ((*  (ptr) pd196 ))))((* (( (ptr) formal←c0754)+4) ), 8, pd196);
      };
   return(0);
   }

static void SetIntButton←P1200(state←v8196, defined←v8224, init←v8252)
   word state←v8196;
   word defined←v8224;
   word init←v8252;
   {
   register ptr gf←c65884 =  (ptr) &globalframe;
   word val←v12436 = 0;
   /* SetIntButton: */ 
SOURCE(10778, 23898)
SOURCE(10874, 23802)
   if ( ( (0 != defined←v8224) ? ( (int)init←v8252 !=  (int)(* (( (ptr) state←v8196)+1) )) : 0 ) ) {
SOURCE(10913, 23763)
      {
         word pd197;
         pd197 = (* (( (ptr) (* (( (ptr) gf←c65884)+248)/* var←c60412 */  ))+27) );
         val←v12436 = (word) ( *( (fPt) ((*  (ptr) pd197 ))))(init←v8252, 8, 1, pd197);
         };
      };
SOURCE(10946, 40)
   {
      word pd198;
      pd198 = (* (( (ptr) (* (( (ptr) gf←c65884)+242)/* var←c59676 */  ))+11) );
      (void) ( *( (fPt) ((*  (ptr) pd198 ))))((* (( (ptr) state←v8196)+2) ), val←v12436, 1, pd198);
      };
   }

static void ClickIntButton←P1260(parent←v44552, clientData←v44580, mouseButton←v44608, shift←v44636, control←v44664)
   word parent←v44552;
   word clientData←v44580;
   word mouseButton←v44608;
   word shift←v44636;
   word control←v44664;
   {
   register ptr gf←c65916 =  (ptr) &globalframe;
   word state←v12480;
   /* ClickIntButton: */ 
SOURCE(10992, 115)
SOURCE(11031, 38)
   state←v12480 = XR←Narrow(clientData←v44580, (* (( (ptr) gf←c65916)+32) ));
SOURCE(11071, 36)
   {
      word pd199;
      pd199 = (* (( (ptr) (* (( (ptr) gf←c65916)+242)/* var←c59676 */  ))+6) );
      (void) ( *( (fPt) ((*  (ptr) pd199 ))))((* (( (ptr) state←v12480)+2) ), 0, pd199);
      };
   }

static void CreateRealButton←P1320(formal←c0311, name←v8312, parent←v8340, pos←v8368, w←v8396, default←v8424, defined←v8452, init←v8480)
   word formal←c0311;
   word name←v8312;
   word parent←v8340;
   W2 pos←v8368;
   word w←v8396;
   word default←v8424;
   word defined←v8452;
   word init←v8480;
   {
   register ptr gf←c65948 =  (ptr) &globalframe;
   word state←v8524;
   word newx←v8552;
   /* CreateRealButton: */ 
SOURCE(11113, 23563)
SOURCE(11113, 23563)
   state←v8524 = 0;
SOURCE(11288, 23388)
   {
      word var←c60444;
      var←c60444 = XR←NewObject(12, (* (( (ptr) gf←c65948)+31) ));
      (* (( (ptr) var←c60444)+1) ) = default←v8424;
      state←v8524 = var←c60444;
      };
SOURCE(11338, 23338)
   {
      W28 var←c60476;
      W35 var←c0306;
      XR←FillWords(&(* (W27Pt) (&var←c60476)), 27, 0);
      (* (( (ptr) &var←c60476)+1) ) = pos←v8368.f0;
      (* (( (ptr) &var←c60476)+2) ) = pos←v8368.f1;
      (* (( (ptr) &var←c60476)+13) ) = name←v8312;
      (* (( (ptr) &var←c60476)+17) ) =  (word) -1;
      (* (( (ptr) &var←c60476)+18) ) = 1;
      (* (( (ptr) &var←c60476)+19) ) = 1358954496;
      (* (( (ptr) &var←c60476)+22) ) = parent←v8340;
      (* (( (ptr) &var←c60476)+27) ) = 27;
      (*  (W28Pt) (word) &var←c0306 ) = var←c60476;
      (* (( (ptr) (word) &var←c0306) + 28) ) = (word) (( (bPt) gf←c65948)+732)/* var←c58108 */ ;
      (* (( (ptr) (word) &var←c0306) + 29) ) = state←v8524;
      (* (( (ptr) (word) &var←c0306) + 30) ) = 0;
      (* (( (ptr) (word) &var←c0306) + 31) ) = 0;
      (* (( (ptr) (word) &var←c0306) + 32) ) = 0;
      (* (( (ptr) (word) &var←c0306) + 33) ) = 0;
      (* (( (ptr) (word) &var←c0306) + 34) ) = 0;
      {
         word pd200;
         pd200 = (* (( (ptr) (* (( (ptr) gf←c65948)+247)/* var←c60188 */  ))+4) );
         (*  (ptr) state←v8524 ) = (word) ( *( (fPt) ((*  (ptr) pd200 ))))((word) (&var←c0306), pd200);
         };
      };
SOURCE(11513, 23163)
   {
      word var←c60508;
      word var←c60540;
      var←c60508 = (pos←v8368.f0 + (* (( (ptr) (*  (ptr) state←v8524 ))+3) ));
      var←c60540 = (pos←v8368.f1 + (* (( (ptr) gf←c65948)+14)/* textFuzz←v4932 */  ));
      pos←v8368.f0 = var←c60508;
      pos←v8368.f1 = var←c60540;
      };
SOURCE(11597, 23079)
   {
      W28 var←c60572;
      W29 var←c0310;
      XR←FillWords(&(* (W27Pt) (&var←c60572)), 27, 0);
      (* (( (ptr) &var←c60572)+1) ) = pos←v8368.f0;
      (* (( (ptr) &var←c60572)+2) ) = pos←v8368.f1;
      (* (( (ptr) &var←c60572)+3) ) = w←v8396;
      (* (( (ptr) &var←c60572)+4) ) = (* (( (ptr) (*  (ptr) state←v8524 ))+4) );
      (* (( (ptr) &var←c60572)+17) ) =  (word) -1;
      (* (( (ptr) &var←c60572)+18) ) = 1;
      (* (( (ptr) &var←c60572)+19) ) = 1358954496;
      (* (( (ptr) &var←c60572)+22) ) = parent←v8340;
      (* (( (ptr) &var←c60572)+27) ) = 27;
      (*  (W28Pt) (word) &var←c0310 ) = (var←c60572
      );
      (* (( (ptr) (word) &var←c0310) + 28) ) = 0;
      {
         word pd201;
         pd201 = (* (( (ptr) (* (( (ptr) gf←c65948)+242)/* var←c59676 */  ))+5) );
         (* (( (ptr) state←v8524)+2) ) = (word) ( *( (fPt) ((*  (ptr) pd201 ))))((word) (&var←c0310), pd201);
         };
      };
SOURCE(11745, 16)
   newx←v8552 = (pos←v8368.f0 + w←v8396);
SOURCE(11763, 35)
   (void) SetRealButton←P1440(state←v8524, defined←v8452, init←v8480);
   /* removed tail goto */ 
   (*  (ptr) formal←c0311 ) = state←v8524;
   (* (( (ptr) formal←c0311)+1) ) = newx←v8552;
   return;
   }

static word GetRealButton←P1380(state←v8612)
   word state←v8612;
   {
   W7 var←c65980;
   register ptr gf←c66012 =  (ptr) &globalframe;
   word val←v8656;
   /* GetRealButton: */ 
SOURCE(11804, 22872)
SOURCE(11868, 19)
   val←v8656 = (* (( (ptr) state←v8612)+1) );
SOURCE(11889, 22787)
SOURCE(11889, 22787)
   {
      /* declaration of var←c60604 skipped */ 
      {
         word pd202;
         pd202 = (* (( (ptr) (* (( (ptr) gf←c66012)+242)/* var←c59676 */  ))+10) );
         var←c65980.f4/* var←c60604 */  = (word) ( *( (fPt) ((*  (ptr) pd202 ))))((* ((( (ptr) state←v8612)+2)) ), pd202);
         };
      {
         /* declaration of var←c011 skipped */ 
         var←c65980.f5/* var←c011 */  = (* (( (ptr) (* (( (ptr) gf←c66012)+248)/* var←c60412 */  ))+12) );
         {
            /* declaration of var←c012 skipped */ 
            {
               word var←c013;
               {
                  word var←c0835;
                  var←c0835 = (word) &var←c65980;
                  var←c013 = (word) XR←Enable(( ((word)  (fPt) NoName←Q6312) ), ( ((word)  (fPt) NoName←Q7932) ), var←c0835);
                  };
               if ((var←c013 == 6)) {
                  goto lab←L100025;
                  };
               };
            val←v8656 = var←c65980.f6/* var←c012 */ ;
            };
         };
      };
   lab←L100025: ;
SOURCE(11804, 22872)
   return(val←v8656);
   }

static word NoName←Q6312(formal←c0759)
   word formal←c0759;
   {
SOURCE(11889, 22787)
   {
      word pd203;
      pd203 = (* (( (ptr) formal←c0759)+5) );
      (* (( (ptr) formal←c0759)+6) ) = (word) ( *( (fPt) ((*  (ptr) pd203 ))))((* ((( (ptr) formal←c0759)+4)) ), pd203);
      };
   return(0);
   }

static void SetRealButton←P1440(state←v8716, defined←v8744, init←v8772)
   word state←v8716;
   word defined←v8744;
   word init←v8772;
   {
   register ptr gf←c66044 =  (ptr) &globalframe;
   word val←v12524 = 0;
   /* SetRealButton: */ 
SOURCE(11986, 22690)
SOURCE(12085, 22591)
   {
      word x204;
      word x205;
      if ( ( (0 != defined←v8744) ? ((
         x204 = init←v8772,  *(float*)&x204
         ) != (
         x205 = (* (( (ptr) state←v8716)+1) ),  *(float*)&x205
         )) : 0 ) ) {
SOURCE(12124, 22552)
         {
            word pd206;
            pd206 = (* (( (ptr) (* (( (ptr) gf←c66044)+248)/* var←c60412 */  ))+31) );
            val←v12524 = (word) ( *( (fPt) ((*  (ptr) pd206 ))))(init←v8772, 7, 0, pd206);
            };
         };
      };
SOURCE(12158, 40)
   {
      word pd207;
      pd207 = (* (( (ptr) (* (( (ptr) gf←c66044)+242)/* var←c59676 */  ))+11) );
      (void) ( *( (fPt) ((*  (ptr) pd207 ))))((* (( (ptr) state←v8716)+2) ), val←v12524, 1, pd207);
      };
   }

static void ClickRealButton←P1500(parent←v44724, clientData←v44752, mouseButton←v44780, shift←v44808, control←v44836)
   word parent←v44724;
   word clientData←v44752;
   word mouseButton←v44780;
   word shift←v44808;
   word control←v44836;
   {
   register ptr gf←c66076 =  (ptr) &globalframe;
   word state←v12568;
   /* ClickRealButton: */ 
SOURCE(12204, 117)
SOURCE(12244, 39)
   state←v12568 = XR←Narrow(clientData←v44752, (* (( (ptr) gf←c66076)+31) ));
SOURCE(12285, 36)
   {
      word pd208;
      pd208 = (* (( (ptr) (* (( (ptr) gf←c66076)+242)/* var←c59676 */  ))+6) );
      (void) ( *( (fPt) ((*  (ptr) pd208 ))))((* (( (ptr) state←v12568)+2) ), 0, pd208);
      };
   }

static void CreateRopeButton←P1560(formal←c0340, name←v8832, parent←v8860, pos←v8888, w←v8916, values←v8944, init←v8972)
   word formal←c0340;
   word name←v8832;
   word parent←v8860;
   W2 pos←v8888;
   word w←v8916;
   word values←v8944;
   word init←v8972;
   {
   register ptr gf←c66108 =  (ptr) &globalframe;
   word state←v9100;
   word newx←v9128;
   /* CreateRopeButton: */ 
SOURCE(12327, 22349)
SOURCE(12327, 22349)
   state←v9100 = 0;
SOURCE(12493, 22183)
   {
      word var←c60636;
      var←c60636 = XR←NewObject(12, (* (( (ptr) gf←c66108)+30) ));
      (* (( (ptr) var←c60636)+1) ) = values←v8944;
      state←v9100 = var←c60636;
      };
SOURCE(12543, 22133)
   {
      W28 var←c60668;
      W35 var←c0335;
      XR←FillWords(&(* (W27Pt) (&var←c60668)), 27, 0);
      (* (( (ptr) &var←c60668)+1) ) = pos←v8888.f0;
      (* (( (ptr) &var←c60668)+2) ) = pos←v8888.f1;
      (* (( (ptr) &var←c60668)+13) ) = name←v8832;
      (* (( (ptr) &var←c60668)+17) ) =  (word) -1;
      (* (( (ptr) &var←c60668)+18) ) = 1;
      (* (( (ptr) &var←c60668)+19) ) = 1358954496;
      (* (( (ptr) &var←c60668)+22) ) = parent←v8860;
      (* (( (ptr) &var←c60668)+27) ) = 27;
      (*  (W28Pt) (word) &var←c0335 ) = var←c60668;
      (* (( (ptr) (word) &var←c0335) + 28) ) = (word) (( (bPt) gf←c66108)+700)/* var←c57980 */ ;
      (* (( (ptr) (word) &var←c0335) + 29) ) = state←v9100;
      (* (( (ptr) (word) &var←c0335) + 30) ) = 0;
      (* (( (ptr) (word) &var←c0335) + 31) ) = 0;
      (* (( (ptr) (word) &var←c0335) + 32) ) = 0;
      (* (( (ptr) (word) &var←c0335) + 33) ) = 0;
      (* (( (ptr) (word) &var←c0335) + 34) ) = 0;
      {
         word pd209;
         pd209 = (* (( (ptr) (* (( (ptr) gf←c66108)+247)/* var←c60188 */  ))+4) );
         (*  (ptr) state←v9100 ) = (word) ( *( (fPt) ((*  (ptr) pd209 ))))((word) (&var←c0335), pd209);
         };
      };
SOURCE(12718, 21958)
   {
      word var←c60700;
      word var←c60732;
      var←c60700 = (pos←v8888.f0 + (* (( (ptr) (*  (ptr) state←v9100 ))+3) ));
      var←c60732 = (pos←v8888.f1 + (* (( (ptr) gf←c66108)+14)/* textFuzz←v4932 */  ));
      pos←v8888.f0 = var←c60700;
      pos←v8888.f1 = var←c60732;
      };
SOURCE(12802, 21874)
   {
      W28 var←c60764;
      W29 var←c0339;
      XR←FillWords(&(* (W27Pt) (&var←c60764)), 27, 0);
      (* (( (ptr) &var←c60764)+1) ) = pos←v8888.f0;
      (* (( (ptr) &var←c60764)+2) ) = pos←v8888.f1;
      (* (( (ptr) &var←c60764)+3) ) = w←v8916;
      (* (( (ptr) &var←c60764)+4) ) = (* (( (ptr) (*  (ptr) state←v9100 ))+4) );
      (* (( (ptr) &var←c60764)+17) ) =  (word) -1;
      (* (( (ptr) &var←c60764)+18) ) = 1;
      (* (( (ptr) &var←c60764)+19) ) = 1358954496;
      (* (( (ptr) &var←c60764)+22) ) = parent←v8860;
      (* (( (ptr) &var←c60764)+27) ) = 27;
      (*  (W28Pt) (word) &var←c0339 ) = (var←c60764
      );
      (* (( (ptr) (word) &var←c0339) + 28) ) = 0;
      {
         word pd210;
         pd210 = (* (( (ptr) (* (( (ptr) gf←c66108)+242)/* var←c59676 */  ))+5) );
         (* (( (ptr) state←v9100)+2) ) = (word) ( *( (fPt) ((*  (ptr) pd210 ))))((word) (&var←c0339), pd210);
         };
      };
SOURCE(12950, 30)
   newx←v9128 = ((pos←v8888.f0 + w←v8916) + (* (( (ptr) gf←c66108)+12)/* entryHSpace←v4876 */  ));
SOURCE(12982, 26)
   (void) SetRopeButton←P1680(state←v9100, init←v8972);
   /* removed tail goto */ 
   (*  (ptr) formal←c0340 ) = state←v9100;
   (* (( (ptr) formal←c0340)+1) ) = newx←v9128;
   return;
   }

static word GetRopeButton←P1620(state←v9188)
   word state←v9188;
   {
   register ptr gf←c66140 =  (ptr) &globalframe;
   word var←c9232;
   /* GetRopeButton: */ 
SOURCE(13014, 21662)
SOURCE(13073, 21603)
   {
      word pd211;
      pd211 = (* (( (ptr) (* (( (ptr) gf←c66140)+242)/* var←c59676 */  ))+10) );
      return((word) ( *( (fPt) ((*  (ptr) pd211 ))))((* ((( (ptr) state←v9188)+2)) ), pd211));
      };
   }

static void SetRopeButton←P1680(state←v9292, val←v9320)
   word state←v9292;
   word val←v9320;
   {
   register ptr gf←c66172 =  (ptr) &globalframe;
   /* SetRopeButton: */ 
SOURCE(13123, 95)
SOURCE(13178, 40)
   {
      word pd212;
      pd212 = (* (( (ptr) (* (( (ptr) gf←c66172)+242)/* var←c59676 */  ))+11) );
      (void) ( *( (fPt) ((*  (ptr) pd212 ))))((* (( (ptr) state←v9292)+2) ), val←v9320, 1, pd212);
      };
   }

static void ClickRopeButton←P1740(parent←v44896, clientData←v44924, mouseButton←v44952, shift←v44980, control←v45008)
   word parent←v44896;
   word clientData←v44924;
   word mouseButton←v44952;
   word shift←v44980;
   word control←v45008;
   {
   W6 var←c66204;
   register ptr gf←c66236 =  (ptr) &globalframe;
   /* declaration of var←c60828 skipped */ 
   word state←v12640;
   /* ClickRopeButton: */ 
SOURCE(13224, 21452)
   {
      word tmpAddr213;
      tmpAddr213 = (word) (( (ptr) &var←c66204)+4)/* var←c60828 */ ;
      (*  (ptr) tmpAddr213 ) = ( ((word)  (fPt) NextName←P3804) );
      (* (( (ptr) tmpAddr213) + 1) ) = 1;
      };
SOURCE(13630, 39)
   state←v12640 = XR←Narrow(clientData←v44924, (* (( (ptr) gf←c66236)+30) ));
SOURCE(13671, 21005)
   if ((mouseButton←v44952 == 2)) {
SOURCE(13698, 42)
      {
         word pd214;
         pd214 = (* (( (ptr) (* (( (ptr) gf←c66236)+242)/* var←c59676 */  ))+6) );
         (void) ( *( (fPt) ((*  (ptr) pd214 ))))((* (( (ptr) state←v12640)+2) ), 0, pd214);
         };
      }
   else {
SOURCE(13740, 20936)
      {
         word var←c60860;
         var←c60860 = (word) NextName←P3804(state←v12640, (word) (( (bPt) &var←c66204)+16)/* var←c60828 */ );
         {
            word pd215;
            pd215 = (* (( (ptr) (* (( (ptr) gf←c66236)+242)/* var←c59676 */  ))+11) );
            (void) ( *( (fPt) ((*  (ptr) pd215 ))))((* (( (ptr) state←v12640)+2) ), var←c60860, 1, pd215);
            };
         };
      };
   }

static word NextName←P3804(state←v12716, formal←c66300)
   word state←v12716;
   word formal←c66300;
   {
   register ptr gf←c66268 =  (ptr) &globalframe;
   word next←v12760;
   word current←v12788;
   formal←c66300 = (formal←c66300 - 16);
   /* NextName: */ 
SOURCE(13264, 21412)
SOURCE(13264, 21412)
   next←v12760 = 0;
SOURCE(13330, 51)
   {
      word pd216;
      pd216 = (* (( (ptr) (* (( (ptr) gf←c66268)+242)/* var←c59676 */  ))+10) );
      current←v12788 = (word) ( *( (fPt) ((*  (ptr) pd216 ))))((* ((( (ptr) state←v12716)+2)) ), pd216);
      };
SOURCE(13383, 35)
   if (((* (( (ptr) state←v12716)+1) ) == 0)) {
SOURCE(13412, 6)
      return(next←v12760);
      };
SOURCE(13420, 21256)
   {
      register word l←v12832;
      l←v12832 = (* (( (ptr) state←v12716)+1) );
      lab←L100032: ;
      if ((l←v12832 != 0)) {
         }
      else {
         goto lab←L100029;
         };
SOURCE(13482, 21194)
      {
         word pd217;
         pd217 = (* (( (ptr) (* (( (ptr) gf←c66268)+235)/* var←c59004 */  ))+8) );
         if ((0 != (word) ( *( (fPt) ((*  (ptr) pd217 ))))(current←v12788, (*  (ptr) l←v12832 ), 0, pd217))) {
SOURCE(13520, 67)
            if (((* (( (ptr) l←v12832)+1) ) == 0)) {
               return((*  (ptr) (* (( (ptr) state←v12716)+1) ) ));
               }
            else {
               return((*  (ptr) (* (( (ptr) l←v12832)+1) ) ));
               };
            };
         };
      l←v12832 = (* (( (ptr) l←v12832)+1) );
      goto lab←L100032;
      lab←L100029: ;
      };
SOURCE(13598, 29)
   return((*  (ptr) (* (( (ptr) state←v12716)+1) ) ));
   }

static void ClickCompress←P1800(state←v45068)
   word state←v45068;
   {
   register ptr gf←c66332 =  (ptr) &globalframe;
   word tool←v12960;
   /* ClickCompress: */ 
SOURCE(13798, 38)
SOURCE(13838, 53)
   tool←v12960 = XR←Narrow((* (( (ptr) (* (( (ptr) (* (( (ptr) (*  (ptr) state←v45068 ))+22) ))+22) ))+26) ), (* (( (ptr) gf←c66332)+16)
       ));
   }

static void CreateOptionsViewer←P1860(formal←c0914)
   word formal←c0914;
   {
   W5 var←c66364;
   /* declaration of tool←v9380 skipped */ 
   var←c66364.f4/* tool←v9380 */  = formal←c0914;
   /* CreateOptionsViewer: */ 
SOURCE(13897, 20779)
   (void) (XR←MonitorEntry(var←c66364.f4/* tool←v9380 */ ));
SOURCE(13953, 20723)
   {
      word var←c014;
      {
         word var←c0836;
         var←c0836 = (word) &var←c66364;
         var←c014 = (word) XR←Enable(( ((word)  (fPt) NoName←Q6372) ), ( ((word)  (fPt) NoName←Q7872) ), var←c0836);
         };
      if ((var←c014 == 1)) {
         goto lab←L010;
         };
      };
SOURCE(13897, 20779)
   (void) (XR←MonitorExit(var←c66364.f4/* tool←v9380 */ ));
   return;
   lab←L010: ;
   return;
   }

static word NoName←Q6372(formal←c0770)
   word formal←c0770;
   {
   register ptr gf←c0769 =  (ptr) &globalframe;
SOURCE(13976, 11)
   {
      W2 curPos←v13004;
      word em←v13032;
      word options←v13060;
      word paperButtons←v13088 = 0;
      word defaultPaper←v13116 = 0;
      word var←c60924;
      word v←v56908;
SOURCE(13989, 30)
      {
         word pd218;
         pd218 = (* (( (ptr) (* (( (ptr) gf←c0769)+249)/* var←c60892 */  ))+7) );
         em←v13032 = (word) ( *( (fPt) ((*  (ptr) pd218 ))))(109, 0, pd218);
         };
SOURCE(14021, 38)
      options←v13060 = (* (( (ptr) (* (( (ptr) formal←c0770)+4) ))+11) );
SOURCE(14177, 20499)
      v←v56908 = (* (( (ptr) (* (( (ptr) formal←c0770)+4) ))+12) );
SOURCE(33546, 30)
      if ((v←v56908 == 0)) {
         var←c60924 = 1;
         }
      else {
         var←c60924 = (((unsigned)(* (( (bPt) v←v56908)+77) ) << 25) >> 31);
         };
      if ((0 == var←c60924)) {
SOURCE(14215, 6)
         (void) (XR←MonitorExit(* (( (ptr) formal←c0770)+4) ));
         return(1);
         };
SOURCE(14246, 20430)
      {
         W28 var←c60956;
         W29 var←c0368;
         XR←FillWords(&(* (W27Pt) (&var←c60956)), 27, 0);
         (* (( (ptr) &var←c60956)+3) ) = 9999;
         (* (( (ptr) &var←c60956)+17) ) =  (word) -1;
         (* (( (ptr) &var←c60956)+18) ) = 1;
         (* (( (ptr) &var←c60956)+19) ) = 285212672;
         (* (( (ptr) &var←c60956)+22) ) = (* (( (ptr) (* (( (ptr) formal←c0770)+4) ))+10) );
         (* (( (ptr) &var←c60956)+27) ) = 27;
         (*  (W28Pt) (word) &var←c0368 ) = var←c60956;
         (* (( (ptr) (word) &var←c0368) + 28) ) = 0;
         {
            word pd219;
            pd219 = (* (( (ptr) (* (( (ptr) gf←c0769)+250)/* var←c60988 */  ))+4) );
            (* (( (ptr) (* (( (ptr) formal←c0770)+4) ))+12) ) = (word) ( *( (fPt) ((*  (ptr) pd219 ))))((word) (&var←c0368), pd219);
            };
         };
SOURCE(14395, 20281)
      curPos←v13004.f0 = (* (( (ptr) gf←c0769)+12)/* entryHSpace←v4876 */  );
      curPos←v13004.f1 = 4;
SOURCE(14422, 20254)
      if ((0 != (* (( (ptr) (* (( (ptr) (* (( (ptr) formal←c0770)+4) ))+5) ))+2) ))) {
SOURCE(14456, 20220)
         {
            W2 var←c61020;
            (void) CreateBoolButton←P840((word) &var←c61020, (* (( (ptr) gf←c0769)+64) ), (* (( (ptr) (* (( (ptr) formal←c0770)+4) ))+12)
                ), curPos←v13004, (* (( (ptr) options←v13060)+1) ), 1
               , (word) (( (bPt) gf←c0769)+692)/* var←c57948 */ );
            curPos←v13004.f0 = var←c61020.f1;
            (* (( (ptr) (* (( (ptr) formal←c0770)+4) ))+16) ) = var←c61020.f0;
            };
         };
SOURCE(14630, 20046)
      {
         W2 var←c61052;
         (void) CreateBoolButton←P840((word) &var←c61052, (* (( (ptr) gf←c0769)+65) ), (* (( (ptr) (* (( (ptr) formal←c0770)+4) ))+12)
             ), curPos←v13004, (*  (ptr) options←v13060 ), 1
            , 0);
         curPos←v13004.f0 = var←c61052.f1;
         (* (( (ptr) (* (( (ptr) formal←c0770)+4) ))+15) ) = var←c61052.f0;
         };
SOURCE(14776, 19900)
      {
         W2 var←c61084;
         (void) CreateRealButton←P1320((word) &var←c61084, (* (( (ptr) gf←c0769)+66) ), (* (( (ptr) (* (( (ptr) formal←c0770)+4) ))+12)
             ), curPos←v13004, IOP2( * ,  (int)6,  (int)em←v13032), (*  (ptr) &fc220 )
            , 1, (* (( (ptr) options←v13060)+11) ));
         curPos←v13004.f0 = var←c61084.f1;
         (* (( (ptr) (* (( (ptr) formal←c0770)+4) ))+22) ) = var←c61084.f0;
         };
SOURCE(14932, 19744)
      {
         W2 var←c61116;
         (void) CreateRopeButton←P1560((word) &var←c61116, (* (( (ptr) gf←c0769)+67) ), (* (( (ptr) (* (( (ptr) formal←c0770)+4) ))+12)
             ), curPos←v13004, 9999, (* (( (ptr) gf←c0769)+7)/* styleList←v4316 */  )
            , (* (( (ptr) options←v13060)+10) ));
         curPos←v13004.f0 = var←c61116.f1;
         (* (( (ptr) (* (( (ptr) formal←c0770)+4) ))+21) ) = var←c61116.f0;
         };
SOURCE(15084, 19592)
      {
         word var←c61148;
         var←c61148 = (curPos←v13004.f1 + (* (( (ptr) gf←c0769)+13)/* entryVSpace←v4904 */  ));
         curPos←v13004.f0 = (* (( (ptr) gf←c0769)+12)/* entryHSpace←v4876 */  );
         curPos←v13004.f1 = var←c61148;
         };
SOURCE(15132, 19544)
      {
         W2 var←c61180;
         (void) CreateBoolButton←P840((word) &var←c61180, (* (( (ptr) gf←c0769)+68) ), (* (( (ptr) (* (( (ptr) formal←c0770)+4) ))+12)
             ), curPos←v13004, (* (( (ptr) options←v13060)+7) ), (* (( (ptr) (* (( (ptr) formal←c0770)+4) ))+7) )
            , 0);
         curPos←v13004.f0 = var←c61180.f1;
         (* (( (ptr) (* (( (ptr) formal←c0770)+4) ))+13) ) = var←c61180.f0;
         };
SOURCE(15304, 19372)
      {
         W2 var←c61212;
         (void) CreateBoolButton←P840((word) &var←c61212, (* (( (ptr) gf←c0769)+69) ), (* (( (ptr) (* (( (ptr) formal←c0770)+4) ))+12)
             ), curPos←v13004, (* (( (ptr) options←v13060)+8) ), (* (( (ptr) (* (( (ptr) formal←c0770)+4) ))+8) )
            , 0);
         curPos←v13004.f0 = var←c61212.f1;
         (* (( (ptr) (* (( (ptr) formal←c0770)+4) ))+14) ) = var←c61212.f0;
         };
SOURCE(15482, 19194)
      {
         W2 var←c61244;
         (void) CreateIntButton←P1080((word) &var←c61244, (* (( (ptr) gf←c0769)+70) ), (* (( (ptr) (* (( (ptr) formal←c0770)+4) ))+12)
             ), curPos←v13004, IOP2( * ,  (int)4,  (int)em←v13032), 1
            , 1, (* (( (ptr) options←v13060)+2) ));
         curPos←v13004.f0 = var←c61244.f1;
         (* (( (ptr) (* (( (ptr) formal←c0770)+4) ))+17) ) = var←c61244.f0;
         };
SOURCE(15636, 19040)
      {
         W2 var←c61276;
         (void) CreateIntButton←P1080((word) &var←c61276, (* (( (ptr) gf←c0769)+71) ), (* (( (ptr) (* (( (ptr) formal←c0770)+4) ))+12)
             ), curPos←v13004, IOP2( * ,  (int)7,  (int)em←v13032), 1
            , 1, (* (( (ptr) options←v13060)+4) ));
         curPos←v13004.f0 = var←c61276.f1;
         (* (( (ptr) (* (( (ptr) formal←c0770)+4) ))+18) ) = var←c61276.f0;
         };
SOURCE(15791, 18885)
      {
         W2 var←c61308;
         (void) CreateIntButton←P1080((word) &var←c61308, (* (( (ptr) gf←c0769)+72) ), (* (( (ptr) (* (( (ptr) formal←c0770)+4) ))+12)
             ), curPos←v13004, IOP2( * ,  (int)7,  (int)em←v13032), 65535
            , 1, (* (( (ptr) options←v13060)+5) ));
         curPos←v13004.f0 = var←c61308.f1;
         (* (( (ptr) (* (( (ptr) formal←c0770)+4) ))+19) ) = var←c61308.f0;
         };
SOURCE(15954, 18722)
      {
         word var←c61340;
         var←c61340 = (curPos←v13004.f1 + (* (( (ptr) gf←c0769)+13)/* entryVSpace←v4904 */  ));
         curPos←v13004.f0 = (* (( (ptr) gf←c0769)+12)/* entryHSpace←v4876 */  );
         curPos←v13004.f1 = var←c61340;
         };
SOURCE(16002, 18674)
      {
         register word mList←v13244;
         mList←v13244 = (* (( (ptr) (* (( (ptr) formal←c0770)+4) ))+6) );
         lab←L100039: ;
         if ((mList←v13244 != 0)) {
            }
         else {
            goto lab←L100036;
            };
SOURCE(16088, 18588)
         {
            word pd221;
            pd221 = (* (( (ptr) (* (( (ptr) gf←c0769)+235)/* var←c59004 */  ))+8) );
            if ((0 != (word) ( *( (fPt) ((*  (ptr) pd221 ))))((*  (ptr) mList←v13244 ), (* (( (ptr) options←v13060)+6) ), 1, pd221))) {
SOURCE(16140, 26)
               defaultPaper←v13116 = (*  (ptr) mList←v13244 );
               };
            };
SOURCE(16168, 18508)
         {
            word pd222;
            pd222 = (* (( (ptr) (* (( (ptr) gf←c0769)+251)/* var←c61372 */  ))+5) );
            if ((0 == (word) ( *( (fPt) ((*  (ptr) pd222 ))))(paperButtons←v13088, (*  (ptr) mList←v13244 ), 1, pd222))) {
SOURCE(16221, 47)
               {
                  word var←c61404;
                  var←c61404 = XR←NewObject(8, (* (( (ptr) gf←c0769)+17) ));
                  (*  (ptr) var←c61404 ) = (*  (ptr) mList←v13244 );
                  (* (( (ptr) var←c61404)+1) ) = paperButtons←v13088;
                  paperButtons←v13088 = var←c61404;
                  };
               };
            };
         mList←v13244 = (* (( (ptr) mList←v13244)+1) );
         goto lab←L100039;
         lab←L100036: ;
         };
SOURCE(16279, 18397)
      {
         word pd223;
         pd223 = (* (( (ptr) (* (( (ptr) gf←c0769)+251)/* var←c61372 */  ))+10) );
         paperButtons←v13088 = (word) ( *( (fPt) ((*  (ptr) pd223 ))))(paperButtons←v13088, pd223);
         };
SOURCE(16326, 18350)
      {
         word pd224;
         pd224 = (* (( (ptr) (* (( (ptr) gf←c0769)+235)/* var←c59004 */  ))+13) );
         if ((0 != (word) ( *( (fPt) ((*  (ptr) pd224 ))))(defaultPaper←v13116, pd224))) {
SOURCE(16361, 33)
            defaultPaper←v13116 = (*  (ptr) paperButtons←v13088 );
            };
         };
SOURCE(16413, 18263)
      {
         word pd225;
         word idx226;
         word idx227;
         pd225 = (* (( (ptr) (* (( (ptr) gf←c0769)+252)/* var←c61436 */  ))+4) );
         (* (( (ptr) (* (( (ptr) formal←c0770)+4) ))+23) ) = (word) ( *( (fPt) ((*  (ptr) pd225 ))))((* (( (ptr) (* (( (ptr) formal←c0770)+4)
                ))+12) ), (
               idx226 = (word) curPos←v13004.f0,
               SGNCK(idx226)
               ), (
               idx227 = (word) curPos←v13004.f1,
               SGNCK(idx227)
               ), (* (( (ptr) gf←c0769)+73) ), paperButtons←v13088, defaultPaper←v13116
            , 1, 0, 0, 0, 0, 1
            , 2147483647, pd225);
         };
SOURCE(16615, 18061)
      {
         word var←c61468;
         var←c61468 = (curPos←v13004.f1 + (* (( (ptr) gf←c0769)+13)/* entryVSpace←v4904 */  ));
         curPos←v13004.f0 = (* (( (ptr) gf←c0769)+12)/* entryHSpace←v4876 */  );
         curPos←v13004.f1 = var←c61468;
         };
SOURCE(16663, 18013)
      {
         W2 var←c61500;
         (void) CreateRopeButton←P1560((word) &var←c61500, (* (( (ptr) gf←c0769)+74) ), (* (( (ptr) (* (( (ptr) formal←c0770)+4) ))+12)
             ), curPos←v13004, 9999, (* (( (ptr) gf←c0769)+8)/* deviceList←v4344 */  )
            , (* (( (ptr) options←v13060)+3) ));
         curPos←v13004.f0 = var←c61500.f1;
         (* (( (ptr) (* (( (ptr) formal←c0770)+4) ))+20) ) = var←c61500.f0;
         };
SOURCE(16814, 17862)
      {
         word var←c61596;
         {
            W28 var←c61532;
            W30 var←c0396;
            XR←FillWords(&(* (W27Pt) (&var←c61532)), 27, 0);
            (* (( (ptr) &var←c61532)+2) ) = (curPos←v13004.f1 + (* (( (ptr) gf←c0769)+13)/* entryVSpace←v4904 */  ));
            (* (( (ptr) &var←c61532)+3) ) = 9999;
            (* (( (ptr) &var←c61532)+4) ) = 1;
            (* (( (ptr) &var←c61532)+17) ) =  (word) -1;
            (* (( (ptr) &var←c61532)+18) ) = 1;
            (* (( (ptr) &var←c61532)+19) ) = 1493172224;
            (* (( (ptr) &var←c61532)+22) ) = (* (( (ptr) (* (( (ptr) formal←c0770)+4) ))+12) );
            (* (( (ptr) &var←c61532)+27) ) = 27;
            (*  (W28Pt) (word) &var←c0396 ) = var←c61532;
            (* (( (ptr) (word) &var←c0396) + 28) ) = 0;
            (* (( (ptr) (word) &var←c0396) + 29) ) = 0;
            {
               word pd228;
               pd228 = (* (( (ptr) (* (( (ptr) gf←c0769)+253)/* var←c61564 */  ))+4) );
               var←c61596 = (word) ( *( (fPt) ((*  (ptr) pd228 ))))((word) (&var←c0396), pd228);
               };
            };
         };
SOURCE(16934, 119)
      (void) PlaceChild←P2760((* (( (ptr) (* (( (ptr) formal←c0770)+4) ))+12) ), 1, ((curPos←v13004.f1 + (* (( (ptr) gf←c0769)+13)
         /* entryVSpace←v4904 */  )) + 1), ((curPos←v13004.f1 + (* (( (ptr) gf←c0769)+13)/* entryVSpace←v4904 */  )) + 1));
SOURCE(17055, 17621)
      {
         word var←c61628;
         var←c61628 = (word) RedisplayTool←P2880((* ((( (ptr) formal←c0770)+4)) ));
         };
      };
   return(0);
   }

static void DestroyOptionsViewer←P1920(formal←c0915)
   word formal←c0915;
   {
   W5 var←c66396;
   /* declaration of tool←v9440 skipped */ 
   var←c66396.f4/* tool←v9440 */  = formal←c0915;
   /* DestroyOptionsViewer: */ 
SOURCE(17085, 17591)
   (void) (XR←MonitorEntry(var←c66396.f4/* tool←v9440 */ ));
SOURCE(17142, 17534)
   {
      word var←c0837;
      var←c0837 = (word) &var←c66396;
       (void) (word) XR←Enable(( ((word)  (fPt) NoName←Q6432) ), ( ((word)  (fPt) NoName←Q7812) ), var←c0837);
      };
SOURCE(17085, 17591)
   (void) (XR←MonitorExit(var←c66396.f4/* tool←v9440 */ ));
   return;
   }

static word NoName←Q6432(formal←c0772)
   word formal←c0772;
   {
   register ptr gf←c0771 =  (ptr) &globalframe;
SOURCE(17165, 17511)
   {
      word var←c61660;
      var←c61660 = (word) GetOptionsInternal←P2040((* (( (ptr) formal←c0772)+4) ), 0);
      };
SOURCE(17203, 65)
   {
      word pd229;
      pd229 = (* (( (ptr) (* (( (ptr) gf←c0771)+237)/* var←c59100 */  ))+15) );
      (void) ( *( (fPt) ((*  (ptr) pd229 ))))((* (( (ptr) (* (( (ptr) formal←c0772)+4) ))+12) ), 0, pd229);
      };
SOURCE(17270, 24)
   (* (( (ptr) (* (( (ptr) formal←c0772)+4) ))+12) ) = 0;
SOURCE(17296, 17380)
   {
      word var←c61692;
      var←c61692 = (word) RedisplayTool←P2880((* ((( (ptr) formal←c0772)+4)) ));
      };
   return(0);
   }

static word GetOptions←P1980(formal←c0916, formal←c0917)
   word formal←c0916;
   word formal←c0917;
   {
   W7 var←c66428;
   /* declaration of tool←v9500 skipped */ 
   /* declaration of reset←v9528 skipped */ 
   /* declaration of options←v9572 skipped */ 
   var←c66428.f4/* tool←v9500 */  = formal←c0916;
   var←c66428.f5/* reset←v9528 */  = formal←c0917;
   /* GetOptions: */ 
SOURCE(17326, 17350)
   (void) (XR←MonitorEntry(var←c66428.f4/* tool←v9500 */ ));
SOURCE(17326, 17350)
   var←c66428.f6/* options←v9572 */  = 0;
SOURCE(17420, 17256)
   {
      word var←c0838;
      var←c0838 = (word) &var←c66428;
       (void) (word) XR←Enable(( ((word)  (fPt) NoName←Q6492) ), ( ((word)  (fPt) NoName←Q7752) ), var←c0838);
      };
SOURCE(17326, 17350)
   (void) (XR←MonitorExit(var←c66428.f4/* tool←v9500 */ ));
   return(var←c66428.f6/* options←v9572 */ );
   }

static word NoName←Q6492(formal←c0773)
   word formal←c0773;
   {
SOURCE(17443, 17233)
   (* (( (ptr) formal←c0773)+6) ) = (word) GetOptionsInternal←P2040((* (( (ptr) formal←c0773)+4) ), (* (( (ptr) formal←c0773)+5)
       ));
   return(0);
   }

static word GetOptionsInternal←P2040(tool←v9632, reset←v9660)
   word tool←v9632;
   word reset←v9660;
   {
   register ptr gf←c66460 =  (ptr) &globalframe;
   word options←v9704;
   /* GetOptionsInternal: */ 
SOURCE(17490, 17186)
SOURCE(17490, 17186)
   options←v9704 = 0;
   {
      word var←c61724;
      word v←v56860;
SOURCE(17586, 17090)
      v←v56860 = (* (( (ptr) tool←v9632)+12) );
SOURCE(33546, 30)
      if ((v←v56860 == 0)) {
         var←c61724 = 1;
         }
      else {
         var←c61724 = (((unsigned)(* (( (bPt) v←v56860)+77) ) << 25) >> 31);
         };
      if ((0 == var←c61724)) {
SOURCE(17670, 17006)
         {
            word var←c61756;
            if (((* (( (ptr) tool←v9632)+16) ) != 0)) {
               var←c61756 = (word) GetBoolButton←P960((* ((( (ptr) tool←v9632)+16)) ));
               }
            else {
               var←c61756 = 0;
               };
            (* (( (ptr) (* (( (ptr) tool←v9632)+11) ))+1) ) = var←c61756;
            };
SOURCE(17790, 16886)
         (*  (ptr) (* (( (ptr) tool←v9632)+11) ) ) = (word) GetBoolButton←P960((* ((( (ptr) tool←v9632)+15)) ));
SOURCE(17861, 16815)
         {
            word var←c61788;
            {
               word idx230;
               var←c61788 = (
                  idx230 = (word) GetIntButton←P1140((* ((( (ptr) tool←v9632)+17)) )),
                  BCK(idx230, 65536)
                  );
               };
            (* (( (ptr) (* (( (ptr) tool←v9632)+11) ))+2) ) = var←c61788;
            };
SOURCE(17934, 16742)
         {
            word var←c61820;
            {
               word idx231;
               var←c61820 = (
                  idx231 = (word) GetIntButton←P1140((* ((( (ptr) tool←v9632)+18)) )),
                  BCK(idx231, 65536)
                  );
               };
            (* (( (ptr) (* (( (ptr) tool←v9632)+11) ))+4) ) = var←c61820;
            };
SOURCE(18010, 16666)
         {
            word var←c61852;
            {
               word idx232;
               var←c61852 = (
                  idx232 = (word) GetIntButton←P1140((* ((( (ptr) tool←v9632)+19)) )),
                  BCK(idx232, 65536)
                  );
               };
            (* (( (ptr) (* (( (ptr) tool←v9632)+11) ))+5) ) = var←c61852;
            };
SOURCE(18084, 16592)
         {
            word pd233;
            pd233 = (* (( (ptr) (* (( (ptr) gf←c66460)+252)/* var←c61436 */  ))+5) );
            (* (( (ptr) (* (( (ptr) tool←v9632)+11) ))+6) ) = (word) ( *( (fPt) ((*  (ptr) pd233 ))))((* ((( (ptr) tool←v9632)+23)) ), pd233)
            ;
            };
SOURCE(18169, 16507)
         (* (( (ptr) (* (( (ptr) tool←v9632)+11) ))+7) ) = (word) GetBoolButton←P960((* ((( (ptr) tool←v9632)+13)) ));
SOURCE(18241, 16435)
         (* (( (ptr) (* (( (ptr) tool←v9632)+11) ))+8) ) = (word) GetBoolButton←P960((* ((( (ptr) tool←v9632)+14)) ));
SOURCE(18316, 35)
         (* (( (ptr) (* (( (ptr) tool←v9632)+11) ))+9) ) = 0;
SOURCE(18372, 16304)
         (* (( (ptr) (* (( (ptr) tool←v9632)+11) ))+10) ) = (word) GetRopeButton←P1620((* ((( (ptr) tool←v9632)+21)) ));
SOURCE(18446, 16230)
         (* (( (ptr) (* (( (ptr) tool←v9632)+11) ))+3) ) = (word) GetRopeButton←P1620((* ((( (ptr) tool←v9632)+20)) ));
SOURCE(18517, 16159)
         (* (( (ptr) (* (( (ptr) tool←v9632)+11) ))+11) ) = (word) GetRealButton←P1380((* ((( (ptr) tool←v9632)+22)) ));
SOURCE(18591, 301)
         if ((0 != reset←v9660)) {
SOURCE(18661, 55)
            (void) SetIntButton←P1200((* (( (ptr) tool←v9632)+17) ), 0, 0);
SOURCE(18718, 58)
            (void) SetIntButton←P1200((* (( (ptr) tool←v9632)+18) ), 0, 0);
SOURCE(18778, 57)
            (void) SetIntButton←P1200((* (( (ptr) tool←v9632)+19) ), 0, 0);
SOURCE(18837, 55)
            (void) SetRealButton←P1440((* (( (ptr) tool←v9632)+22) ), 0, (*  (ptr) &fc234 ));
            };
         };
SOURCE(18900, 49)
      {
         word var←c61884;
         var←c61884 = XR←NewObject(48, (* (( (ptr) gf←c66460)+29) ));
         (*  (W12Pt) var←c61884 ) = (*  (W12Pt) (* (( (ptr) tool←v9632)+11) ) );
         options←v9704 = var←c61884;
         };
      };
SOURCE(17490, 17186)
   return(options←v9704);
   }

static void SetOptions←P2100(formal←c0918, formal←c0919)
   word formal←c0918;
   word formal←c0919;
   {
   W6 var←c66492;
   /* declaration of tool←v9764 skipped */ 
   /* declaration of options←v9792 skipped */ 
   var←c66492.f4/* tool←v9764 */  = formal←c0918;
   var←c66492.f5/* options←v9792 */  = formal←c0919;
   /* SetOptions: */ 
SOURCE(18986, 15690)
   (void) (XR←MonitorEntry(var←c66492.f4/* tool←v9764 */ ));
SOURCE(19051, 15625)
   {
      word var←c0839;
      var←c0839 = (word) &var←c66492;
       (void) (word) XR←Enable(( ((word)  (fPt) NoName←Q6552) ), ( ((word)  (fPt) NoName←Q7632) ), var←c0839);
      };
SOURCE(18986, 15690)
   (void) (XR←MonitorExit(var←c66492.f4/* tool←v9764 */ ));
   return;
   }

static word NoName←Q6552(formal←c0776)
   word formal←c0776;
   {
   W8 var←c0884;
   register ptr gf←c0775 =  (ptr) &globalframe;
   word var←c61916;
   word v←v56812;
   var←c0884.f0 = formal←c0776;
SOURCE(19074, 31)
   (*  (W12Pt) (* (( (ptr) (* (( (ptr) formal←c0776)+4) ))+11) ) ) = (*  (W12Pt) (* (( (ptr) formal←c0776)+5) ) );
SOURCE(19137, 15539)
   v←v56812 = (* (( (ptr) (* (( (ptr) formal←c0776)+4) ))+12) );
SOURCE(33546, 30)
   if ((v←v56812 == 0)) {
      var←c61916 = 1;
      }
   else {
      var←c61916 = (((unsigned)(* (( (bPt) v←v56812)+77) ) << 25) >> 31);
      };
   if ((0 == var←c61916)) {
SOURCE(19219, 139)
      if (((* (( (ptr) (* (( (ptr) formal←c0776)+4) ))+16) ) != 0)) {
SOURCE(19254, 67)
         (void) SetBoolButton←P1020((* (( (ptr) (* (( (ptr) formal←c0776)+4) ))+16) ), (* (( (ptr) (* (( (ptr) formal←c0776)+5) ))+1)
             ));
SOURCE(19323, 35)
         (void) ClickCompress←P1800((* ((( (ptr) (* (( (ptr) formal←c0776)+4) ))+16)) ));
         };
SOURCE(19363, 63)
      (void) SetBoolButton←P1020((* (( (ptr) (* (( (ptr) formal←c0776)+4) ))+15) ), (*  (ptr) (* (( (ptr) formal←c0776)+5) ) ))
      ;
SOURCE(19428, 64)
      (void) SetBoolButton←P1020((* (( (ptr) (* (( (ptr) formal←c0776)+4) ))+13) ), (* (( (ptr) (* (( (ptr) formal←c0776)+5) ))+7)
          ));
SOURCE(19494, 67)
      (void) SetBoolButton←P1020((* (( (ptr) (* (( (ptr) formal←c0776)+4) ))+14) ), (* (( (ptr) (* (( (ptr) formal←c0776)+5) ))+8)
          ));
SOURCE(19563, 64)
      (void) SetIntButton←P1200((* (( (ptr) (* (( (ptr) formal←c0776)+4) ))+17) ), 1, (* (( (ptr) (* (( (ptr) formal←c0776)+5) ))+2)
          ));
SOURCE(19629, 67)
      (void) SetIntButton←P1200((* (( (ptr) (* (( (ptr) formal←c0776)+4) ))+18) ), 1, (* (( (ptr) (* (( (ptr) formal←c0776)+5) ))+4)
          ));
SOURCE(19698, 65)
      (void) SetIntButton←P1200((* (( (ptr) (* (( (ptr) formal←c0776)+4) ))+19) ), 1, (* (( (ptr) (* (( (ptr) formal←c0776)+5) ))+5)
          ));
SOURCE(19765, 160)
SOURCE(19765, 160)
      {
         /* declaration of var←c015 skipped */ 
         /* declaration of var←c016 skipped */ 
         /* declaration of var←c017 skipped */ 
         /* declaration of var←c018 skipped */ 
         var←c0884.f4/* var←c015 */  = (* (( (ptr) (* (( (ptr) formal←c0776)+4) ))+12) );
         var←c0884.f5/* var←c016 */  = (* (( (ptr) (* (( (ptr) formal←c0776)+4) ))+23) );
         var←c0884.f6/* var←c017 */  = (* (( (ptr) (* (( (ptr) formal←c0776)+5) ))+6) );
         var←c0884.f7/* var←c018 */  = (* (( (ptr) (* (( (ptr) gf←c0775)+252)/* var←c61436 */  ))+6) );
         {
            word var←c019;
            {
               word var←c0840;
               var←c0840 = (word) &var←c0884;
               var←c019 = (word) XR←Enable(( ((word)  (fPt) NoName←Q6612) ), ( ((word)  (fPt) NoName←Q7692) ), var←c0840);
               };
            /* removed trivial cond node */ 
            };
         };
SOURCE(19936, 64)
      (void) SetRopeButton←P1680((* (( (ptr) (* (( (ptr) formal←c0776)+4) ))+21) ), (* (( (ptr) (* (( (ptr) formal←c0776)+5) ))+10)
          ));
SOURCE(20002, 65)
      (void) SetRealButton←P1440((* (( (ptr) (* (( (ptr) formal←c0776)+4) ))+22) ), 1, (* (( (ptr) (* (( (ptr) formal←c0776)+5)
             ))+11) ));
SOURCE(20069, 61)
      (void) SetRopeButton←P1680((* (( (ptr) (* (( (ptr) formal←c0776)+4) ))+20) ), (* (( (ptr) (* (( (ptr) formal←c0776)+5) ))+3)
          ));
      };
   return(0);
   }

static word NoName←Q6612(formal←c0777)
   word formal←c0777;
   {
SOURCE(19765, 160)
   {
      word pd235;
      pd235 = (* (( (ptr) formal←c0777)+7) );
      (void) ( *( (fPt) ((*  (ptr) pd235 ))))((* (( (ptr) formal←c0777)+4) ), (* (( (ptr) formal←c0777)+5) ), (* (( (ptr) formal←c0777)+6)
          ), pd235);
      };
   return(0);
   }

static word DefaultOptions←P2160()
   {
   register ptr gf←c66524 =  (ptr) &globalframe;
   word options←v9852;
   word context←v13372;
   /* DefaultOptions: */ 
SOURCE(20139, 14537)
SOURCE(20139, 14537)
   options←v9852 = 0;
SOURCE(20201, 50)
   {
      word pd236;
      pd236 = (* (( (ptr) (* (( (ptr) gf←c66524)+236)/* var←c59068 */  ))+12) );
      context←v13372 = (word) ( *( (fPt) ((*  (ptr) pd236 ))))(0, pd236);
      };
SOURCE(20253, 44)
   {
      word var←c61948;
      var←c61948 = XR←NewObject(48, (* (( (ptr) gf←c66524)+29) ));
      (*  (W12Pt) var←c61948 ) = (*  (W12Pt) (* (( (ptr) gf←c66524)+6)/* defaultOptions←v4288 */  ) );
      options←v9852 = var←c61948;
      };
SOURCE(20334, 39)
   (* (( (ptr) options←v9852)+6) ) = (* (( (ptr) context←v13372)+1) );
SOURCE(20375, 33)
   (* (( (ptr) options←v9852)+7) ) = (* (( (ptr) context←v13372)+13) );
SOURCE(20410, 35)
   (* (( (ptr) options←v9852)+8) ) = (* (( (ptr) context←v13372)+15) );
SOURCE(20447, 37)
   (* (( (ptr) options←v9852)+9) ) = (* (( (ptr) context←v13372)+14) );
SOURCE(20139, 14537)
   return(options←v9852);
   }

static void DefaultOptionsFromProfile←P2220()
   {
   W6 var←c66556;
   register ptr gf←c66588 =  (ptr) &globalframe;
   /* declaration of var←c61980 skipped */ 
   word options←v13444;
   /* DefaultOptionsFromProfile: */ 
SOURCE(20490, 14186)
   {
      word tmpAddr237;
      tmpAddr237 = (word) (( (ptr) &var←c66556)+4)/* var←c61980 */ ;
      (*  (ptr) tmpAddr237 ) = ( ((word)  (fPt) EachTool←P4008) );
      (* (( (ptr) tmpAddr237) + 1) ) = 1;
      };
SOURCE(20689, 35)
   options←v13444 = XR←NewObject(48, (* (( (ptr) gf←c66588)+29) ));
   (* (( (ptr) options←v13444)+2) ) = 1;
   (* (( (ptr) options←v13444)+4) ) = 1;
   (* (( (ptr) options←v13444)+5) ) = 65535;
   (* (( (ptr) options←v13444)+11) ) = (*  (ptr) &fc220 );
SOURCE(20726, 13950)
   {
      word pd238;
      pd238 = (* (( (ptr) (* (( (ptr) gf←c66588)+254)/* var←c62044 */  ))+4) );
      (*  (ptr) options←v13444 ) = (word) ( *( (fPt) ((*  (ptr) pd238 ))))((* (( (ptr) gf←c66588)+77) ), 0, pd238);
      };
SOURCE(20790, 13886)
   {
      word pd239;
      pd239 = (* (( (ptr) (* (( (ptr) gf←c66588)+254)/* var←c62044 */  ))+6) );
      (* (( (ptr) options←v13444)+10) ) = (word) ( *( (fPt) ((*  (ptr) pd239 ))))((* (( (ptr) gf←c66588)+78) ), 0, pd239);
      };
SOURCE(20853, 13823)
   {
      word var←c62076;
      {
         word pd240;
         pd240 = (* (( (ptr) (* (( (ptr) gf←c66588)+254)/* var←c62044 */  ))+4) );
         if ((0 != (word) ( *( (fPt) ((*  (ptr) pd240 ))))((* (( (ptr) gf←c66588)+80) ), 0, pd240))) {
            var←c62076 = (* (( (ptr) gf←c66588)+81) );
            }
         else {
            var←c62076 = 0;
            };
         };
      {
         word pd241;
         pd241 = (* (( (ptr) (* (( (ptr) gf←c66588)+254)/* var←c62044 */  ))+6) );
         (* (( (ptr) options←v13444)+3) ) = (word) ( *( (fPt) ((*  (ptr) pd241 ))))((* (( (ptr) gf←c66588)+79) ), var←c62076, pd241)
         ;
         };
      };
SOURCE(20987, 24)
   (* (( (ptr) gf←c66588)+6)/* defaultOptions←v4288 */  ) = options←v13444;
SOURCE(21013, 13663)
   {
      word var←c62108;
      {
         word var←c62140;
         word var←c62172;
         var←c62140 = XR←NewObject(8, (* (( (ptr) gf←c66588)+17) ));
         var←c62172 = var←c62140;
         (*  (ptr) var←c62172 ) = (* (( (ptr) gf←c66588)+90) );
         (* (( (ptr) var←c62172)+1) ) = XR←NewObject(8, (* (( (ptr) gf←c66588)+17) ));
         var←c62172 = (* (( (ptr) var←c62172)+1) );
         (*  (ptr) var←c62172 ) = (* (( (ptr) gf←c66588)+89) );
         (* (( (ptr) var←c62172)+1) ) = XR←NewObject(8, (* (( (ptr) gf←c66588)+17) ));
         var←c62172 = (* (( (ptr) var←c62172)+1) );
         (*  (ptr) var←c62172 ) = (* (( (ptr) gf←c66588)+88) );
         (* (( (ptr) var←c62172)+1) ) = XR←NewObject(8, (* (( (ptr) gf←c66588)+17) ));
         var←c62172 = (* (( (ptr) var←c62172)+1) );
         (*  (ptr) var←c62172 ) = (* (( (ptr) gf←c66588)+87) );
         (* (( (ptr) var←c62172)+1) ) = XR←NewObject(8, (* (( (ptr) gf←c66588)+17) ));
         var←c62172 = (* (( (ptr) var←c62172)+1) );
         (*  (ptr) var←c62172 ) = (* (( (ptr) gf←c66588)+86) );
         (* (( (ptr) var←c62172)+1) ) = XR←NewObject(8, (* (( (ptr) gf←c66588)+17) ));
         var←c62172 = (* (( (ptr) var←c62172)+1) );
         (*  (ptr) var←c62172 ) = (* (( (ptr) gf←c66588)+85) );
         (* (( (ptr) var←c62172)+1) ) = XR←NewObject(8, (* (( (ptr) gf←c66588)+17) ));
         var←c62172 = (* (( (ptr) var←c62172)+1) );
         (*  (ptr) var←c62172 ) = (* (( (ptr) gf←c66588)+84) );
         (* (( (ptr) var←c62172)+1) ) = XR←NewObject(8, (* (( (ptr) gf←c66588)+17) ));
         var←c62172 = (* (( (ptr) var←c62172)+1) );
         (*  (ptr) var←c62172 ) = (* (( (ptr) gf←c66588)+83) );
         var←c62108 = var←c62140;
         };
      {
         word pd242;
         pd242 = (* (( (ptr) (* (( (ptr) gf←c66588)+254)/* var←c62044 */  ))+7) );
         (* (( (ptr) gf←c66588)+7)/* styleList←v4316 */  ) = (word) ( *( (fPt) ((*  (ptr) pd242 ))))((* (( (ptr) gf←c66588)+82) ), var←c62108, pd242)
         ;
         };
      };
SOURCE(21210, 13466)
   {
      word var←c62204;
      {
         word var←c62236;
         word var←c62268;
         var←c62236 = XR←NewObject(8, (* (( (ptr) gf←c66588)+17) ));
         var←c62268 = var←c62236;
         (*  (ptr) var←c62268 ) = (* (( (ptr) gf←c66588)+81) );
         (* (( (ptr) var←c62268)+1) ) = XR←NewObject(8, (* (( (ptr) gf←c66588)+17) ));
         var←c62268 = (* (( (ptr) var←c62268)+1) );
         (*  (ptr) var←c62268 ) = (* (( (ptr) gf←c66588)+93) );
         (* (( (ptr) var←c62268)+1) ) = XR←NewObject(8, (* (( (ptr) gf←c66588)+17) ));
         var←c62268 = (* (( (ptr) var←c62268)+1) );
         (*  (ptr) var←c62268 ) = (* (( (ptr) gf←c66588)+92) );
         var←c62204 = var←c62236;
         };
      {
         word pd243;
         pd243 = (* (( (ptr) (* (( (ptr) gf←c66588)+254)/* var←c62044 */  ))+7) );
         (* (( (ptr) gf←c66588)+8)/* deviceList←v4344 */  ) = (word) ( *( (fPt) ((*  (ptr) pd243 ))))((* (( (ptr) gf←c66588)+91) ), var←c62204, pd243)
         ;
         };
      };
SOURCE(21306, 39)
   (void) DefinePrinterVersions←P3060((* ((( (ptr) gf←c66588)+11)/* standardVersions←v4428 */ ) ));
SOURCE(21347, 13329)
   {
      word var←c62300;
      {
         word pd244;
         pd244 = (* (( (ptr) (* (( (ptr) gf←c66588)+254)/* var←c62044 */  ))+7) );
         var←c62300 = (word) ( *( (fPt) ((*  (ptr) pd244 ))))((* (( (ptr) gf←c66588)+94) ), 0, pd244);
         };
      (void) DefinePrinterVersions←P3060(var←c62300);
      };
SOURCE(21429, 36)
   {
      word pd245;
      pd245 = (* (( (ptr) (* (( (ptr) gf←c66588)+237)/* var←c59100 */  ))+25) );
      (void) ( *( (fPt) ((*  (ptr) pd245 ))))((word) ((( (bPt) &var←c66556)+16)/* var←c61980 */ ), pd245);
      };
   }

static word EachTool←P4008(v←v51248, formal←c66652)
   word v←v51248;
   word formal←c66652;
   {
   register ptr gf←c66620 =  (ptr) &globalframe;
   word var←c51292;
   word tool←v13488 = 0;
   formal←c66652 = (formal←c66652 - 16);
   /* EachTool: */ 
SOURCE(20529, 155)
SOURCE(20529, 155)
   var←c51292 = 1;
SOURCE(20574, 59)
   if (((*  (ptr) v←v51248 ) != (* (( (ptr) gf←c66620)+5)/* xTSViewerClass←v4260 */  )) || (* (( (bPt) v←v51248)+77) ) & 0100) {
SOURCE(20620, 13)
      return(1);
      };
SOURCE(20635, 22)
   tool←v13488 = XR←Narrow((* (( (ptr) v←v51248)+26) ), (* (( (ptr) gf←c66620)+16) ));
SOURCE(20659, 25)
   (void) SetupPrinterVersion←P3000(tool←v13488);
SOURCE(20529, 155)
   return(var←c51292);
   }

static void CreateServerStatusViewer←P2280(formal←c0920)
   word formal←c0920;
   {
   W9 var←c66684;
   /* declaration of tool←v9928 skipped */ 
   /* declaration of var←c62332 skipped */ 
   (* (( (ptr) &var←c66684)+4)/* tool←v9928 */  ) = formal←c0920;
   /* CreateServerStatusViewer: */ 
SOURCE(21522, 13154)
   {
      word tmpAddr246;
      tmpAddr246 = (word) (( (ptr) &var←c66684)+5)/* var←c62332 */ ;
      (*  (ptr) tmpAddr246 ) = ( ((word)  (fPt) NewNamedLabel←P4116) );
      (* (( (ptr) tmpAddr246) + 1) ) = 1;
      };
   (void) (XR←MonitorEntry(* (( (ptr) &var←c66684)+4)/* tool←v9928 */  ));
SOURCE(21583, 13093)
   {
      /* declaration of posX←v13644 skipped */ 
      /* declaration of posY←v13672 skipped */ 
      {
         word var←c0841;
         var←c0841 = (word) &var←c66684;
          (void) (word) XR←Enable(( ((word)  (fPt) NoName←Q6672) ), ( ((word)  (fPt) NoName←Q7572) ), var←c0841);
         };
      };
SOURCE(21522, 13154)
   (void) (XR←MonitorExit(* (( (ptr) &var←c66684)+4)/* tool←v9928 */  ));
   return;
   }

static word NoName←Q6672(formal←c0783)
   word formal←c0783;
   {
   register ptr gf←c0782 =  (ptr) &globalframe;
SOURCE(21606, 21)
   {
      word v←v13700 = 0;
SOURCE(22320, 12356)
      {
         W28 var←c62364;
         W29 var←c0440;
         XR←FillWords(&(* (W27Pt) (&var←c62364)), 27, 0);
         (* (( (ptr) &var←c62364)+3) ) = 9999;
         (* (( (ptr) &var←c62364)+17) ) =  (word) -1;
         (* (( (ptr) &var←c62364)+18) ) = 1;
         (* (( (ptr) &var←c62364)+19) ) = 285212672;
         (* (( (ptr) &var←c62364)+22) ) = (* (( (ptr) (* (( (ptr) formal←c0783)+4) ))+10) );
         (* (( (ptr) &var←c62364)+27) ) = 27;
         (*  (W28Pt) (word) &var←c0440 ) = var←c62364;
         (* (( (ptr) (word) &var←c0440) + 28) ) = 0;
         {
            word pd247;
            pd247 = (* (( (ptr) (* (( (ptr) gf←c0782)+250)/* var←c60988 */  ))+4) );
            (* (( (ptr) (* (( (ptr) formal←c0783)+4) ))+24) ) = (word) ( *( (fPt) ((*  (ptr) pd247 ))))((word) (&var←c0440), pd247);
            };
         };
SOURCE(22475, 12)
      (* (( (ptr) formal←c0783)+7) ) = 2;
SOURCE(22489, 12)
      (* (( (ptr) formal←c0783)+8) ) = 2;
SOURCE(22503, 12173)
      (* (( (ptr) (* (( (ptr) formal←c0783)+4) ))+25) ) = (word) NewNamedLabel←P4116((* (( (ptr) gf←c0782)+73) ), 0, 9999, (word) (
            ( (bPt) formal←c0783)+20));
SOURCE(22569, 12)
      (* (( (ptr) formal←c0783)+7) ) = 2;
SOURCE(22583, 18)
      (* (( (ptr) formal←c0783)+8) ) = ((* (( (ptr) formal←c0783)+8) ) + 16);
SOURCE(22603, 12073)
      (* (( (ptr) (* (( (ptr) formal←c0783)+4) ))+26) ) = (word) NewNamedLabel←P4116((* (( (ptr) gf←c0782)+95) ), (* (( (ptr) gf←c0782)+96)
          ), 0, (word) (( (bPt) formal←c0783)+20));
SOURCE(22685, 11991)
      (* (( (ptr) (* (( (ptr) formal←c0783)+4) ))+27) ) = (word) NewNamedLabel←P4116((* (( (ptr) gf←c0782)+97) ), (* (( (ptr) gf←c0782)+98)
          ), 0, (word) (( (bPt) formal←c0783)+20));
SOURCE(22770, 11906)
      (* (( (ptr) (* (( (ptr) formal←c0783)+4) ))+28) ) = (word) NewNamedLabel←P4116((* (( (ptr) gf←c0782)+99) ), (* (( (ptr) gf←c0782)+100)
          ), 0, (word) (( (bPt) formal←c0783)+20));
SOURCE(22871, 18)
      (* (( (ptr) formal←c0783)+8) ) = ((* (( (ptr) formal←c0783)+8) ) + 16);
SOURCE(22891, 11785)
      {
         W28 var←c62396;
         W30 var←c0442;
         XR←FillWords(&(* (W27Pt) (&var←c62396)), 27, 0);
         (* (( (ptr) &var←c62396)+2) ) = (* (( (ptr) formal←c0783)+8) );
         (* (( (ptr) &var←c62396)+3) ) = 9999;
         (* (( (ptr) &var←c62396)+4) ) = 1;
         (* (( (ptr) &var←c62396)+17) ) =  (word) -1;
         (* (( (ptr) &var←c62396)+18) ) = 1;
         (* (( (ptr) &var←c62396)+19) ) = 1493172224;
         (* (( (ptr) &var←c62396)+22) ) = (* (( (ptr) (* (( (ptr) formal←c0783)+4) ))+24) );
         (* (( (ptr) &var←c62396)+27) ) = 27;
         (*  (W28Pt) (word) &var←c0442 ) = var←c62396;
         (* (( (ptr) (word) &var←c0442) + 28) ) = 0;
         (* (( (ptr) (word) &var←c0442) + 29) ) = 0;
         {
            word pd248;
            pd248 = (* (( (ptr) (* (( (ptr) gf←c0782)+253)/* var←c61564 */  ))+4) );
            v←v13700 = (word) ( *( (fPt) ((*  (ptr) pd248 ))))((word) (&var←c0442), pd248);
            };
         };
SOURCE(23000, 98)
      (void) PlaceChild←P2760((* (( (ptr) (* (( (ptr) formal←c0783)+4) ))+24) ), 0, ((* (( (ptr) formal←c0783)+8) ) + 1), ((* (
            ( (ptr) formal←c0783)+8) ) + 1));
SOURCE(23100, 11576)
      {
         word var←c62428;
         var←c62428 = (word) RedisplayTool←P2880((* ((( (ptr) formal←c0783)+4)) ));
         };
SOURCE(23134, 11542)
SOURCE(23135, 11541)
      {
         W2 var←c62460;
         {
            W2 var←c0446;
            word var←c0445;
            var←c0445 = XR←ExtensionAlloc(6);
            {
               word tmpAddr249;
               tmpAddr249 = (word) var←c0445;
               (*  (ptr) tmpAddr249 ) = ( ((word)  (fPt) NoName←Q8352) );
               (* (( (ptr) tmpAddr249) + 1) ) = 0;
               (* (( (ptr) tmpAddr249) + 2) ) = (word) (( (bPt) gf←c0782)+612)/* var←c57628 */ ;
               (* (( (ptr) tmpAddr249) + 3) ) = 0;
               (* (( (ptr) tmpAddr249) + 4) ) = (* (( (ptr) formal←c0783)+4) );
               (* (( (ptr) tmpAddr249) + 5) ) = 30;
               };
            (void) XR←Fork((word) &var←c0446, var←c0445);
            var←c62460 = var←c0446;
            };
         {
            word pd250;
            pd250 = (* (( (ptr) (* (( (ptr) gf←c0782)+255)/* var←c62492 */  ))+11) );
            (void) ( *( (fPt) ((*  (ptr) pd250 ))))(var←c62460, pd250);
            };
         };
      };
   return(0);
   }

static word NewNamedLabel←P4116(name←v13776, size←v13804, w←v13832, formal←c66748)
   word name←v13776;
   word size←v13804;
   word w←v13832;
   word formal←c66748;
   {
   register ptr gf←c66716 =  (ptr) &globalframe;
   word v←v13876;
   word width←v13904;
   formal←c66748 = (formal←c66748 - 20);
   /* NewNamedLabel: */ 
SOURCE(21606, 21)
SOURCE(21606, 21)
   v←v13876 = 0;
SOURCE(21693, 71)
   {
      word tc251;
      word pd252;
      word pd253;
      pd252 = (* (( (ptr) (* (( (ptr) gf←c66716)+235)/* var←c59004 */  ))+13) );
      if ((0 != (word) ( *( (fPt) ((*  (ptr) pd252 ))))(size←v13804, pd252))) {
         tc251 =  (word) w←v13832;
         }
      else {
         pd253 = (* (( (ptr) (* (( (ptr) gf←c66716)+249)/* var←c60892 */  ))+8) );
         tc251 =  (word) ( *( (fPt) ((*  (ptr) pd253 ))))(size←v13804, 0, pd253);
         };
      width←v13904 = tc251;
      };
SOURCE(21766, 12910)
   {
      W28 var←c62524;
      W30 var←c0456;
      XR←FillWords(&(* (W27Pt) (&var←c62524)), 27, 0);
      (* (( (ptr) &var←c62524)+1) ) = (* (( (ptr) formal←c66748)+7) );
      (* (( (ptr) &var←c62524)+2) ) = (* (( (ptr) formal←c66748)+8) );
      (* (( (ptr) &var←c62524)+13) ) = name←v13776;
      (* (( (ptr) &var←c62524)+17) ) =  (word) -1;
      (* (( (ptr) &var←c62524)+18) ) = 1;
      (* (( (ptr) &var←c62524)+19) ) = 1358954496;
      (* (( (ptr) &var←c62524)+22) ) = (* (( (ptr) (* (( (ptr) formal←c66748)+4) ))+24) );
      (* (( (ptr) &var←c62524)+27) ) = 27;
      (*  (W28Pt) (word) &var←c0456 ) = var←c62524;
      (* (( (ptr) (word) &var←c0456) + 28) ) = 0;
      (* (( (ptr) (word) &var←c0456) + 29) ) = 0;
      {
         word pd254;
         pd254 = (* (( (ptr) (* (( (ptr) gf←c66716)+256)/* var←c62556 */  ))+4) );
         v←v13876 = (word) ( *( (fPt) ((*  (ptr) pd254 ))))((word) (&var←c0456), pd254);
         };
      };
SOURCE(21888, 22)
   (* (( (ptr) formal←c66748)+7) ) = (((* (( (ptr) formal←c66748)+7) ) + (* (( (ptr) v←v13876)+3) )) + 2);
SOURCE(21912, 12764)
   {
      W28 var←c62588;
      W30 var←c0458;
      XR←FillWords(&(* (W27Pt) (&var←c62588)), 27, 0);
      (* (( (ptr) &var←c62588)+1) ) = (* (( (ptr) formal←c66748)+7) );
      (* (( (ptr) &var←c62588)+2) ) = (* (( (ptr) formal←c66748)+8) );
      (* (( (ptr) &var←c62588)+3) ) = width←v13904;
      (* (( (ptr) &var←c62588)+17) ) =  (word) -1;
      (* (( (ptr) &var←c62588)+18) ) = 1;
      (* (( (ptr) &var←c62588)+19) ) = 1358954496;
      (* (( (ptr) &var←c62588)+22) ) = (* (( (ptr) (* (( (ptr) formal←c66748)+4) ))+24) );
      (* (( (ptr) &var←c62588)+27) ) = 27;
      (*  (W28Pt) (word) &var←c0458 ) = var←c62588;
      (* (( (ptr) (word) &var←c0458) + 28) ) = 0;
      (* (( (ptr) (word) &var←c0458) + 29) ) = 0;
      {
         word pd255;
         pd255 = (* (( (ptr) (* (( (ptr) gf←c66716)+256)/* var←c62556 */  ))+4) );
         v←v13876 = (word) ( *( (fPt) ((*  (ptr) pd255 ))))((word) (&var←c0458), pd255);
         };
      };
SOURCE(22033, 22)
   (* (( (ptr) formal←c66748)+7) ) = (((* (( (ptr) formal←c66748)+7) ) + (* (( (ptr) v←v13876)+3) )) + 2);
SOURCE(21606, 21)
   return(v←v13876);
   }

static void DestroyServerStatusViewer←P2340(formal←c0921)
   word formal←c0921;
   {
   W5 var←c66780;
   /* declaration of tool←v9988 skipped */ 
   var←c66780.f4/* tool←v9988 */  = formal←c0921;
   /* DestroyServerStatusViewer: */ 
SOURCE(23224, 11452)
   (void) (XR←MonitorEntry(var←c66780.f4/* tool←v9988 */ ));
SOURCE(23286, 11390)
   {
      word var←c0842;
      var←c0842 = (word) &var←c66780;
       (void) (word) XR←Enable(( ((word)  (fPt) NoName←Q6732) ), ( ((word)  (fPt) NoName←Q7512) ), var←c0842);
      };
SOURCE(23224, 11452)
   (void) (XR←MonitorExit(var←c66780.f4/* tool←v9988 */ ));
   return;
   }

static word NoName←Q6732(formal←c0787)
   word formal←c0787;
   {
   register ptr gf←c0786 =  (ptr) &globalframe;
   word var←c62620;
   word v←v56764;
SOURCE(23309, 11367)
   v←v56764 = (* (( (ptr) (* (( (ptr) formal←c0787)+4) ))+24) );
SOURCE(33546, 30)
   if ((v←v56764 == 0)) {
      var←c62620 = 1;
      }
   else {
      var←c62620 = (((unsigned)(* (( (bPt) v←v56764)+77) ) << 25) >> 31);
      };
   if ((0 == var←c62620)) {
SOURCE(23353, 71)
      {
         word pd256;
         pd256 = (* (( (ptr) (* (( (ptr) gf←c0786)+237)/* var←c59100 */  ))+15) );
         (void) ( *( (fPt) ((*  (ptr) pd256 ))))((* (( (ptr) (* (( (ptr) formal←c0787)+4) ))+24) ), 0, pd256);
         };
      };
SOURCE(23426, 11250)
   {
      word var←c62652;
      var←c62652 = (word) RedisplayTool←P2880((* ((( (ptr) formal←c0787)+4)) ));
      };
SOURCE(23452, 33)
   (void) (XR←Broadcast((word) (( (bPt) (* (( (ptr) formal←c0787)+4) ))+116)));
   return(0);
   }

static void ServerStatusWatcher←P2400(formal←c0922, delay←v10076)
   word formal←c0922;
   word delay←v10076;
   {
   W19 var←c66812;
   /* declaration of tool←v10048 skipped */ 
   register ptr gf←c66844 =  (ptr) &globalframe;
   /* declaration of var←c62684 skipped */ 
   /* declaration of var←c62716 skipped */ 
   /* declaration of var←c62748 skipped */ 
   W4 previousStatus←v14032;
   word first←v14060 = 1;
   word previousMedia←v14088;
   (* (( (ptr) &var←c66812)+4)/* tool←v10048 */  ) = formal←c0922;
   /* ServerStatusWatcher: */ 
SOURCE(23554, 11122)
   {
      word tmpAddr257;
      tmpAddr257 = (word) (( (ptr) &var←c66812)+5)/* var←c62684 */ ;
      (*  (ptr) tmpAddr257 ) = ( ((word)  (fPt) Report←P4296) );
      (* (( (ptr) tmpAddr257) + 1) ) = 1;
      };
   {
      word tmpAddr258;
      tmpAddr258 = (word) (( (ptr) &var←c66812)+7)/* var←c62716 */ ;
      (*  (ptr) tmpAddr258 ) = ( ((word)  (fPt) WaitServerStatusTimer←P4236) );
      (* (( (ptr) tmpAddr258) + 1) ) = 1;
      };
   {
      word tmpAddr259;
      tmpAddr259 = (word) (( (ptr) &var←c66812)+9)/* var←c62748 */ ;
      (*  (ptr) tmpAddr259 ) = ( ((word)  (fPt) SetServerStatusTimer←P4176) );
      (* (( (ptr) tmpAddr259) + 1) ) = 1;
      };
SOURCE(24215, 38)
   previousStatus←v14032.f0 = 0;
   previousStatus←v14032.f1 = 0;
   previousStatus←v14032.f2 = 0;
   previousStatus←v14032.f3 = 0;
SOURCE(24294, 25)
   previousMedia←v14088 = (* (( (ptr) gf←c66844)+101) );
SOURCE(24321, 10355)
   {
      word var←c62812;
      word v←v56716;
      lab←L100059: ;
      v←v56716 = (* (( (ptr) (* (( (ptr) &var←c66812)+4)/* tool←v10048 */  ))+24) );
SOURCE(33546, 30)
      if ((v←v56716 == 0)) {
         var←c62812 = 1;
         }
      else {
         var←c62812 = (((unsigned)(* (( (bPt) v←v56716)+77) ) << 25) >> 31);
         };
      if ((0 == var←c62812)) {
         }
      else {
         goto lab←L100057;
         };
SOURCE(24394, 10282)
      if ((* (( (bPt) (* (( (ptr) (* (( (ptr) &var←c66812)+4)/* tool←v10048 */  ))+24) ))+76) ) & 1) {
SOURCE(24435, 1309)
         {
            W4 currentStatus←v14368;
            /* declaration of statusSucceded←v14396 skipped */ 
            word currentMedia←v14424 = 0;
SOURCE(24485, 37)
            currentStatus←v14368.f0 = 0;
            currentStatus←v14368.f1 = 0;
            currentStatus←v14368.f2 = 0;
            currentStatus←v14368.f3 = 0;
SOURCE(24524, 27)
            (* (( (ptr) &var←c66812)+11)/* statusSucceded←v14396 */  ) = 1;
SOURCE(24579, 33)
            (void) SetServerStatusTimer←P4176((* (( (ptr) &var←c66812)+4)/* tool←v10048 */  ), delay←v10076, (word) (( (bPt) &var←c66812)+36)
               /* var←c62748 */ );
SOURCE(24614, 10062)
            {
               /* declaration of var←c020 skipped */ 
               /* declaration of var←c021 skipped */ 
               /* declaration of var←c022 skipped */ 
SOURCE(24614, 10062)
               (* (( (ptr) &var←c66812)+12)/* var←c020 */  ) = (* (( (ptr) (* (( (ptr) &var←c66812)+4)/* tool←v10048 */  ))+4) );
               (* (( (ptr) &var←c66812)+13)/* var←c021 */  ) = (* (( (ptr) (* (( (ptr) gf←c66844)+236)/* var←c59068 */  ))+9) );
               {
                  word var←c023;
                  {
                     word var←c0843;
                     var←c0843 = (word) &var←c66812;
                     var←c023 = (word) XR←Enable(( ((word)  (fPt) NoName←Q6792) ), ( ((word)  (fPt) NoName←Q7452) ), var←c0843);
                     };
                  if ((var←c023 == 8)) {
                     goto lab←L100062;
                     };
                  };
               currentStatus←v14368 = (*  (W4Pt) ((( (ptr) &var←c66812)+14)/* var←c022 */ +1) );
               lab←L100062: ;
               };
SOURCE(24811, 9865)
            if ((0 != (* (( (ptr) &var←c66812)+11)/* statusSucceded←v14396 */  ))) {
SOURCE(24861, 9815)
               if ((0 != first←v14060) || (previousStatus←v14032.f0 != currentStatus←v14368.f0)) {
SOURCE(24923, 9753)
                  {
                     word var←c62908;
                     {
                        word pd260;
                        pd260 = (* (( (ptr) (* (( (ptr) gf←c66844)+257)/* var←c62940 */  ))+17) );
                        var←c62908 = (word) ( *( (fPt) ((*  (ptr) pd260 ))))(currentStatus←v14368.f0, 0, pd260);
                        };
                     (void) Report←P4296((* (( (ptr) (* (( (ptr) &var←c66812)+4)/* tool←v10048 */  ))+26) ), var←c62908, (word) (( (bPt) &var←c66812)+20)
                        /* var←c62684 */ );
                     };
                  };
SOURCE(25017, 9659)
               if ((0 != first←v14060) || (previousStatus←v14032.f1 != currentStatus←v14368.f1)) {
SOURCE(25083, 9593)
                  {
                     word var←c62972;
                     {
                        word pd261;
                        pd261 = (* (( (ptr) (* (( (ptr) gf←c66844)+257)/* var←c62940 */  ))+27) );
                        var←c62972 = (word) ( *( (fPt) ((*  (ptr) pd261 ))))(currentStatus←v14368.f1, 0, pd261);
                        };
                     (void) Report←P4296((* (( (ptr) (* (( (ptr) &var←c66812)+4)/* tool←v10048 */  ))+27) ), var←c62972, (word) (( (bPt) &var←c66812)+20)
                        /* var←c62684 */ );
                     };
                  };
SOURCE(25183, 9493)
               if ((0 != first←v14060) || (previousStatus←v14032.f2 != currentStatus←v14368.f2)) {
SOURCE(25245, 9431)
                  {
                     word var←c63004;
                     {
                        word pd262;
                        pd262 = (* (( (ptr) (* (( (ptr) gf←c66844)+257)/* var←c62940 */  ))+15) );
                        var←c63004 = (word) ( *( (fPt) ((*  (ptr) pd262 ))))(currentStatus←v14368.f2, 0, pd262);
                        };
                     (void) Report←P4296((* (( (ptr) (* (( (ptr) &var←c66812)+4)/* tool←v10048 */  ))+28) ), var←c63004, (word) (( (bPt) &var←c66812)+20)
                        /* var←c62684 */ );
                     };
                  };
SOURCE(25351, 9325)
               {
                  register word mList←v14468;
                  mList←v14468 = currentStatus←v14368.f3;
                  lab←L100068: ;
                  if ((mList←v14468 != 0)) {
                     }
                  else {
                     goto lab←L100065;
                     };
SOURCE(25428, 9248)
                  {
                     word pd263;
                     pd263 = (* (( (ptr) (* (( (ptr) gf←c66844)+235)/* var←c59004 */  ))+13) );
                     if ((0 != (word) ( *( (fPt) ((*  (ptr) pd263 ))))(currentMedia←v14424, pd263))) {
SOURCE(25463, 32)
                        currentMedia←v14424 = (*  (ptr) mList←v14468 );
                        }
                     else {
SOURCE(25495, 9181)
                        {
                           word pd264;
                           pd264 = (* (( (ptr) (* (( (ptr) gf←c66844)+235)/* var←c59004 */  ))+5) );
                           currentMedia←v14424 = (word) ( *( (fPt) ((*  (ptr) pd264 ))))(currentMedia←v14424, (* (( (ptr) gf←c66844)+103) ), (*  (ptr) mList←v14468 ), 0, 0, pd264)
                           ;
                           };
                        };
                     };
                  mList←v14468 = (* (( (ptr) mList←v14468)+1) );
                  goto lab←L100068;
                  lab←L100065: ;
                  };
SOURCE(25561, 9115)
               {
                  word pd265;
                  pd265 = (* (( (ptr) (* (( (ptr) gf←c66844)+235)/* var←c59004 */  ))+8) );
                  if ((0 == (word) ( *( (fPt) ((*  (ptr) pd265 ))))(currentMedia←v14424, previousMedia←v14088, 1, pd265))) {
SOURCE(25613, 49)
                     {
                        word pd266;
                        pd266 = (* (( (ptr) (* (( (ptr) gf←c66844)+256)/* var←c62556 */  ))+6) );
                        (void) ( *( (fPt) ((*  (ptr) pd266 ))))((* (( (ptr) (* (( (ptr) &var←c66812)+4)/* tool←v10048 */  ))+25) ), currentMedia←v14424, 1, pd266)
                        ;
                        };
                     };
                  };
SOURCE(25664, 30)
               previousStatus←v14032 = currentStatus←v14368;
SOURCE(25696, 28)
               previousMedia←v14088 = currentMedia←v14424;
SOURCE(25726, 13)
               first←v14060 = 0;
               };
            };
         }
      else {
SOURCE(25822, 29)
         (void) SetServerStatusTimer←P4176((* (( (ptr) &var←c66812)+4)/* tool←v10048 */  ), 1, (word) (( (bPt) &var←c66812)+36)/* var←c62748 */ )
         ;
         };
SOURCE(25856, 27)
      (void) WaitServerStatusTimer←P4236((* (( (ptr) &var←c66812)+4)/* tool←v10048 */  ), (word) (( (bPt) &var←c66812)+28)/* var←c62716 */ )
      ;
      goto lab←L100059;
      lab←L100057: ;
      };
   }

static word NoName←Q6792(formal←c0789)
   word formal←c0789;
   {
SOURCE(24614, 10062)
   {
      word pd267;
      pd267 = (* (( (ptr) formal←c0789)+13) );
      (void) ( *( (fPt) ((*  (ptr) pd267 ))))((word) (( (bPt) formal←c0789)+56), (* (( (ptr) formal←c0789)+12) ), pd267);
      };
   return(0);
   }

static void SetServerStatusTimer←P4176(formal←c0923, formal←c0924, formal←c66908)
   word formal←c0923;
   word formal←c0924;
   word formal←c66908;
   {
   W6 var←c66876;
   /* declaration of tool←v14164 skipped */ 
   /* declaration of value←v14192 skipped */ 
   formal←c66908 = (formal←c66908 - 36);
   var←c66876.f4/* tool←v14164 */  = formal←c0923;
   var←c66876.f5/* value←v14192 */  = formal←c0924;
   var←c66876.f0 = formal←c66908;
   /* SetServerStatusTimer: */ 
SOURCE(23609, 11067)
   (void) (XR←MonitorEntry(var←c66876.f4/* tool←v14164 */ ));
SOURCE(23679, 10997)
   {
      word var←c0844;
      var←c0844 = (word) &var←c66876;
       (void) (word) XR←Enable(( ((word)  (fPt) NoName←Q6852) ), ( ((word)  (fPt) NoName←Q7392) ), var←c0844);
      };
SOURCE(23609, 11067)
   (void) (XR←MonitorExit(var←c66876.f4/* tool←v14164 */ ));
   return;
   }

static word NoName←Q6852(formal←c0792)
   word formal←c0792;
   {
   register ptr gf←c0791 =  (ptr) &globalframe;
SOURCE(23702, 10974)
   {
      word var←c63036;
      {
         word pd268;
         word idx269;
         pd268 = (* (( (ptr) (* (( (ptr) gf←c0791)+255)/* var←c62492 */  ))+7) );
         var←c63036 = (word) ( *( (fPt) ((*  (ptr) pd268 ))))((
               idx269 = (* (( (ptr) formal←c0792)+5) ),
               SGNCK(idx269)
               ), pd268);
         };
      {
         word pd270;
         pd270 = (* (( (ptr) (* (( (ptr) gf←c0791)+255)/* var←c62492 */  ))+9) );
         (void) ( *( (fPt) ((*  (ptr) pd270 ))))((word) (( (bPt) (* (( (ptr) formal←c0792)+4) ))+116), var←c63036, pd270);
         };
      };
SOURCE(23781, 33)
   (void) (XR←Broadcast((word) (( (bPt) (* (( (ptr) formal←c0792)+4) ))+116)));
   return(0);
   }

static void WaitServerStatusTimer←P4236(formal←c0925, formal←c66972)
   word formal←c0925;
   word formal←c66972;
   {
   W5 var←c66940;
   /* declaration of tool←v14252 skipped */ 
   formal←c66972 = (formal←c66972 - 28);
   var←c66940.f4/* tool←v14252 */  = formal←c0925;
   var←c66940.f0 = formal←c66972;
   /* WaitServerStatusTimer: */ 
SOURCE(23819, 102)
   (void) (XR←MonitorEntry(var←c66940.f4/* tool←v14252 */ ));
SOURCE(23870, 51)
   {
      word var←c0845;
      var←c0845 = (word) &var←c66940;
       (void) (word) XR←Enable(( ((word)  (fPt) NoName←Q6912) ), ( ((word)  (fPt) NoName←Q7332) ), var←c0845);
      };
SOURCE(23819, 102)
   (void) (XR←MonitorExit(var←c66940.f4/* tool←v14252 */ ));
   return;
   }

static word NoName←Q6912(formal←c0794)
   word formal←c0794;
   {
SOURCE(23893, 28)
   (void) (XR←Wait((* (( (ptr) formal←c0794)+4) ), (word) (( (bPt) (* (( (ptr) formal←c0794)+4) ))+116)));
   return(0);
   }

static void Report←P4296(v←v14312, new←v14340, formal←c67036)
   word v←v14312;
   word new←v14340;
   word formal←c67036;
   {
   register ptr gf←c67004 =  (ptr) &globalframe;
   formal←c67036 = (formal←c67036 - 20);
   /* Report: */ 
SOURCE(23926, 284)
SOURCE(23966, 18)
   {
      word pd271;
      pd271 = (* (( (ptr) (* (( (ptr) gf←c67004)+256)/* var←c62556 */  ))+6) );
      (void) ( *( (fPt) ((*  (ptr) pd271 ))))(v←v14312, new←v14340, 1, pd271);
      };
   {
      word pd272;
      pd272 = (* (( (ptr) (* (( (ptr) gf←c67004)+235)/* var←c59004 */  ))+8) );
      if ((0 != (word) ( *( (fPt) ((*  (ptr) pd272 ))))(new←v14340, (* (( (ptr) gf←c67004)+104) ), 0, pd272))) {
SOURCE(24042, 40)
         {
            word pd273;
            pd273 = (* (( (ptr) (* (( (ptr) gf←c67004)+256)/* var←c62556 */  ))+7) );
            (void) ( *( (fPt) ((*  (ptr) pd273 ))))(v←v14312, (* (( (ptr) gf←c67004)+60) ), 1, pd273);
            };
         }
      else {
         {
            word pd274;
            pd274 = (* (( (ptr) (* (( (ptr) gf←c67004)+235)/* var←c59004 */  ))+8) );
            if ((0 != (word) ( *( (fPt) ((*  (ptr) pd274 ))))(new←v14340, (* (( (ptr) gf←c67004)+105) ), 0, pd274))) {
SOURCE(24118, 39)
               {
                  word pd275;
                  pd275 = (* (( (ptr) (* (( (ptr) gf←c67004)+256)/* var←c62556 */  ))+7) );
                  (void) ( *( (fPt) ((*  (ptr) pd275 ))))(v←v14312, (* (( (ptr) gf←c67004)+59) ), 1, pd275);
                  };
               }
            else {
SOURCE(24170, 40)
               {
                  word pd276;
                  pd276 = (* (( (ptr) (* (( (ptr) gf←c67004)+256)/* var←c62556 */  ))+7) );
                  (void) ( *( (fPt) ((*  (ptr) pd276 ))))(v←v14312, (* (( (ptr) gf←c67004)+58) ), 1, pd276);
                  };
               };
            };
         };
      };
   }

static word CreateStatusReport←P2460(formal←c0926, formal←c0927)
   word formal←c0926;
   word formal←c0927;
   {
   W7 var←c67068;
   /* declaration of tool←v10136 skipped */ 
   /* declaration of title←v10164 skipped */ 
   /* declaration of state←v10208 skipped */ 
   var←c67068.f4/* tool←v10136 */  = formal←c0926;
   var←c67068.f5/* title←v10164 */  = formal←c0927;
   /* CreateStatusReport: */ 
SOURCE(25897, 8779)
   (void) (XR←MonitorEntry(var←c67068.f4/* tool←v10136 */ ));
SOURCE(25897, 8779)
   var←c67068.f6/* state←v10208 */  = 0;
SOURCE(25995, 8681)
   {
      word var←c0846;
      var←c0846 = (word) &var←c67068;
       (void) (word) XR←Enable(( ((word)  (fPt) NoName←Q6972) ), ( ((word)  (fPt) NoName←Q7272) ), var←c0846);
      };
SOURCE(25897, 8779)
   (void) (XR←MonitorExit(var←c67068.f4/* tool←v10136 */ ));
   return(var←c67068.f6/* state←v10208 */ );
   }

static word NoName←Q6972(formal←c0798)
   word formal←c0798;
   {
   register ptr gf←c0797 =  (ptr) &globalframe;
SOURCE(26018, 10)
   {
      word x←v14596 = 2;
SOURCE(26138, 8538)
      {
         word var←c63068;
         var←c63068 = XR←NewObject(36, (* (( (ptr) gf←c0797)+27) ));
         (*  (ptr) var←c63068 ) = (* (( (ptr) formal←c0798)+4) );
         (* (( (ptr) var←c63068)+7) ) = 1;
         (* (( (ptr) formal←c0798)+6) ) = var←c63068;
         };
SOURCE(26184, 8492)
      if (((* (( (ptr) (* (( (ptr) formal←c0798)+4) ))+35) ) == 0) || (* (( (bPt) (* (( (ptr) (* (( (ptr) formal←c0798)+4) ))+35)
          ))+77) ) & 0100) {
SOURCE(26324, 8352)
         {
            W28 var←c63100;
            W29 var←c0493;
            XR←FillWords(&(* (W27Pt) (&var←c63100)), 27, 0);
            (* (( (ptr) &var←c63100)+3) ) = 9999;
            (* (( (ptr) &var←c63100)+17) ) =  (word) -1;
            (* (( (ptr) &var←c63100)+18) ) = 1;
            (* (( (ptr) &var←c63100)+19) ) = 1358954496;
            (* (( (ptr) &var←c63100)+22) ) = (* (( (ptr) (* (( (ptr) formal←c0798)+4) ))+10) );
            (* (( (ptr) &var←c63100)+27) ) = 27;
            (*  (W28Pt) (word) &var←c0493 ) = var←c63100;
            (* (( (ptr) (word) &var←c0493) + 28) ) = 0;
            {
               word pd277;
               pd277 = (* (( (ptr) (* (( (ptr) gf←c0797)+250)/* var←c60988 */  ))+4) );
               (* (( (ptr) (* (( (ptr) formal←c0798)+4) ))+35) ) = (word) ( *( (fPt) ((*  (ptr) pd277 ))))((word) (&var←c0493), pd277);
               };
            };
SOURCE(26467, 8209)
         {
            W28 var←c63132;
            W30 var←c0495;
            XR←FillWords(&(* (W27Pt) (&var←c63132)), 27, 0);
            (* (( (ptr) &var←c63132)+3) ) = 9999;
            (* (( (ptr) &var←c63132)+4) ) = 1;
            (* (( (ptr) &var←c63132)+17) ) =  (word) -1;
            (* (( (ptr) &var←c63132)+18) ) = 1;
            (* (( (ptr) &var←c63132)+19) ) = 1493172224;
            (* (( (ptr) &var←c63132)+22) ) = (* (( (ptr) (* (( (ptr) formal←c0798)+4) ))+10) );
            (* (( (ptr) &var←c63132)+27) ) = 27;
            (*  (W28Pt) (word) &var←c0495 ) = var←c63132;
            (* (( (ptr) (word) &var←c0495) + 28) ) = 0;
            (* (( (ptr) (word) &var←c0495) + 29) ) = 0;
            {
               word pd278;
               pd278 = (* (( (ptr) (* (( (ptr) gf←c0797)+253)/* var←c61564 */  ))+4) );
               (* (( (ptr) (* (( (ptr) formal←c0798)+4) ))+36) ) = (word) ( *( (fPt) ((*  (ptr) pd278 ))))((word) (&var←c0495), pd278);
               };
            };
         };
SOURCE(26569, 8107)
      {
         W28 var←c63164;
         W29 var←c0497;
         XR←FillWords(&(* (W27Pt) (&var←c63164)), 27, 0);
         (* (( (ptr) &var←c63164)+3) ) = 9999;
         (* (( (ptr) &var←c63164)+4) ) = 24;
         (* (( (ptr) &var←c63164)+17) ) =  (word) -1;
         (* (( (ptr) &var←c63164)+18) ) = 1;
         (* (( (ptr) &var←c63164)+19) ) = 419430400;
         (* (( (ptr) &var←c63164)+22) ) = (* (( (ptr) (* (( (ptr) formal←c0798)+4) ))+35) );
         (* (( (ptr) &var←c63164)+27) ) = 27;
         (*  (W28Pt) (word) &var←c0497 ) = var←c63164;
         (* (( (ptr) (word) &var←c0497) + 28) ) = 0;
         {
            word pd279;
            pd279 = (* (( (ptr) (* (( (ptr) gf←c0797)+250)/* var←c60988 */  ))+4) );
            (* (( (ptr) (* (( (ptr) formal←c0798)+6) ))+1) ) = (word) ( *( (fPt) ((*  (ptr) pd279 ))))((word) (&var←c0497), pd279);
            };
         };
SOURCE(26728, 7948)
      {
         W28 var←c63196;
         W30 var←c0499;
         XR←FillWords(&(* (W27Pt) (&var←c63196)), 27, 0);
         (* (( (ptr) &var←c63196)+1) ) = x←v14596;
         (* (( (ptr) &var←c63196)+2) ) = 2;
         (* (( (ptr) &var←c63196)+4) ) = 16;
         (* (( (ptr) &var←c63196)+17) ) =  (word) -1;
         (* (( (ptr) &var←c63196)+18) ) = 1;
         (* (( (ptr) &var←c63196)+19) ) = 285212672;
         (* (( (ptr) &var←c63196)+22) ) = (* (( (ptr) (* (( (ptr) formal←c0798)+6) ))+1) );
         (* (( (ptr) &var←c63196)+27) ) = 27;
         (*  (W28Pt) (word) &var←c0499 ) = var←c63196;
         (* (( (ptr) (word) &var←c0499) + 28) ) = 0;
         (* (( (ptr) (word) &var←c0499) + 29) ) = 0;
         {
            word pd280;
            pd280 = (* (( (ptr) (* (( (ptr) gf←c0797)+256)/* var←c62556 */  ))+4) );
            (* (( (ptr) (* (( (ptr) formal←c0798)+6) ))+4) ) = (word) ( *( (fPt) ((*  (ptr) pd280 ))))((word) (&var←c0499), pd280);
            };
         };
SOURCE(26927, 7749)
      {
         word pd281;
         pd281 = (* (( (ptr) (* (( (ptr) gf←c0797)+258)/* var←c63228 */  ))+4) );
         (* (( (ptr) (* (( (ptr) formal←c0798)+6) ))+2) ) = (word) ( *( (fPt) ((*  (ptr) pd281 ))))((* (( (ptr) (* (( (ptr) formal←c0798)+6)
                ))+1) ), x←v14596, 2, 16, (*  (ptr) &fc282 ), 25, pd281);
         };
SOURCE(27026, 32)
      {
         word pd283;
         pd283 = (* (( (ptr) (* (( (ptr) gf←c0797)+258)/* var←c63228 */  ))+5) );
         (void) ( *( (fPt) ((*  (ptr) pd283 ))))((* (( (ptr) (* (( (ptr) formal←c0798)+6) ))+2) ), (*  (ptr) &fc282 ), pd283);
         };
SOURCE(27060, 24)
      x←v14596 = ((x←v14596 + (* (( (ptr) (* (( (ptr) (* (( (ptr) formal←c0798)+6) ))+2) ))+3) )) + 4);
SOURCE(27086, 7590)
      {
         W28 var←c63260;
         W35 var←c0501;
         XR←FillWords(&(* (W27Pt) (&var←c63260)), 27, 0);
         (* (( (ptr) &var←c63260)+1) ) = x←v14596;
         (* (( (ptr) &var←c63260)+2) ) = 2;
         (* (( (ptr) &var←c63260)+13) ) = (* (( (ptr) gf←c0797)+107) );
         (* (( (ptr) &var←c63260)+17) ) =  (word) -1;
         (* (( (ptr) &var←c63260)+18) ) = 1;
         (* (( (ptr) &var←c63260)+19) ) = 419430400;
         (* (( (ptr) &var←c63260)+22) ) = (* (( (ptr) (* (( (ptr) formal←c0798)+6) ))+1) );
         (* (( (ptr) &var←c63260)+27) ) = 27;
         (*  (W28Pt) (word) &var←c0501 ) = var←c63260;
         (* (( (ptr) (word) &var←c0501) + 28) ) = (word) (( (bPt) gf←c0797)+588)/* var←c57532 */ ;
         (* (( (ptr) (word) &var←c0501) + 29) ) = (* (( (ptr) formal←c0798)+6) );
         (* (( (ptr) (word) &var←c0501) + 30) ) = 0;
         (* (( (ptr) (word) &var←c0501) + 31) ) = 0;
         (* (( (ptr) (word) &var←c0501) + 32) ) = 0;
         (* (( (ptr) (word) &var←c0501) + 33) ) = 1;
         (* (( (ptr) (word) &var←c0501) + 34) ) = 0;
         {
            word pd284;
            pd284 = (* (( (ptr) (* (( (ptr) gf←c0797)+247)/* var←c60188 */  ))+4) );
            (* (( (ptr) (* (( (ptr) formal←c0798)+6) ))+3) ) = (word) ( *( (fPt) ((*  (ptr) pd284 ))))((word) (&var←c0501), pd284);
            };
         };
SOURCE(27296, 7380)
      {
         W28 var←c63292;
         W30 var←c0503;
         XR←FillWords(&(* (W27Pt) (&var←c63292)), 27, 0);
         (* (( (ptr) &var←c63292)+1) ) = 70;
         (* (( (ptr) &var←c63292)+2) ) = 2;
         (* (( (ptr) &var←c63292)+13) ) = (* (( (ptr) formal←c0798)+5) );
         (* (( (ptr) &var←c63292)+17) ) =  (word) -1;
         (* (( (ptr) &var←c63292)+18) ) = 1;
         (* (( (ptr) &var←c63292)+19) ) = 285212672;
         (* (( (ptr) &var←c63292)+22) ) = (* (( (ptr) (* (( (ptr) formal←c0798)+6) ))+1) );
         (* (( (ptr) &var←c63292)+27) ) = 27;
         (*  (W28Pt) (word) &var←c0503 ) = var←c63292;
         (* (( (ptr) (word) &var←c0503) + 28) ) = 0;
         (* (( (ptr) (word) &var←c0503) + 29) ) = 0;
         {
            word pd285;
            pd285 = (* (( (ptr) (* (( (ptr) gf←c0797)+256)/* var←c62556 */  ))+4) );
            (* (( (ptr) (* (( (ptr) formal←c0798)+6) ))+5) ) = (word) ( *( (fPt) ((*  (ptr) pd285 ))))((word) (&var←c0503), pd285);
            };
         };
      };
   return(0);
   }

static void ResizeStatusContainer←P2520(formal←c0928)
   word formal←c0928;
   {
   W7 var←c67100;
   /* declaration of tool←v10268 skipped */ 
   register ptr gf←c67132 =  (ptr) &globalframe;
   /* declaration of var←c63324 skipped */ 
   var←c67100.f4/* tool←v10268 */  = formal←c0928;
   /* ResizeStatusContainer: */ 
SOURCE(27443, 7233)
   {
      word tmpAddr286;
      tmpAddr286 = (word) (( (ptr) &var←c67100)+5)/* var←c63324 */ ;
      (*  (ptr) tmpAddr286 ) = ( ((word)  (fPt) Resize←P4500) );
      (* (( (ptr) tmpAddr286) + 1) ) = 1;
      };
SOURCE(28403, 55)
   if (((* (( (ptr) var←c67100.f4/* tool←v10268 */ )+10) ) == 0) || (* (( (bPt) (* (( (ptr) var←c67100.f4/* tool←v10268 */ )+10)
       ))+77) ) & 0100) {
SOURCE(28452, 6)
      return;
      };
SOURCE(28479, 51)
   {
      word pd287;
      pd287 = (* (( (ptr) (* (( (ptr) gf←c67132)+259)/* var←c63356 */  ))+4) );
      (void) ( *( (fPt) ((*  (ptr) pd287 ))))((word) (( (bPt) &var←c67100)+20)/* var←c63324 */ , (* (( (ptr) var←c67100.f4/* tool←v10268 */ )+10)
          ), pd287);
      };
   }

static void Resize←P4500(formal←c67196)
   word formal←c67196;
   {
   register ptr gf←c67164 =  (ptr) &globalframe;
   word curY←v14756 = 0;
   formal←c67196 = (formal←c67196 - 20);
   /* Resize: */ 
SOURCE(27555, 7121)
SOURCE(27620, 221)
   {
      register word v←v14800;
      v←v14800 = (* (( (ptr) (* (( (ptr) (* (( (ptr) formal←c67196)+4) ))+35) ))+24) );
      lab←L100078: ;
      if ((v←v14800 != 0)) {
         }
      else {
         goto lab←L100075;
         };
SOURCE(27696, 20)
      if ((* (( (bPt) v←v14800)+77) ) & 0100) {
SOURCE(27716, 4)
         goto lab←L100077;
         };
SOURCE(27722, 19)
      curY←v14756 = (curY←v14756 + 2);
SOURCE(27743, 80)
      {
         word pd288;
         pd288 = (* (( (ptr) (* (( (ptr) gf←c67164)+237)/* var←c59100 */  ))+37) );
         (void) ( *( (fPt) ((*  (ptr) pd288 ))))(v←v14800, (* (( (ptr) v←v14800)+1) ), curY←v14756, (* (( (ptr) v←v14800)+3) ), (* (
               ( (ptr) v←v14800)+4) ), pd288);
         };
SOURCE(27825, 16)
      curY←v14756 = (curY←v14756 + (* (( (ptr) v←v14800)+4) ));
      lab←L100077: ;
      v←v14800 = (* (( (ptr) v←v14800)+23) );
      goto lab←L100078;
      lab←L100075: ;
      };
SOURCE(27852, 451)
   if (( (int)curY←v14756 !=  (int)0)) {
SOURCE(27899, 97)
      (void) PlaceChild←P2760((* (( (ptr) (* (( (ptr) formal←c67196)+4) ))+35) ), 2, 0, curY←v14756);
SOURCE(27998, 84)
      (void) PlaceChild←P2760((* (( (ptr) (* (( (ptr) formal←c67196)+4) ))+36) ), 3, 1, 1);
      }
   else {
SOURCE(28093, 74)
      {
         word pd289;
         pd289 = (* (( (ptr) (* (( (ptr) gf←c67164)+237)/* var←c59100 */  ))+15) );
         (void) ( *( (fPt) ((*  (ptr) pd289 ))))((* (( (ptr) (* (( (ptr) formal←c67196)+4) ))+35) ), 0, pd289);
         };
SOURCE(28169, 33)
      (* (( (ptr) (* (( (ptr) formal←c67196)+4) ))+35) ) = 0;
SOURCE(28204, 69)
      {
         word pd290;
         pd290 = (* (( (ptr) (* (( (ptr) gf←c67164)+237)/* var←c59100 */  ))+15) );
         (void) ( *( (fPt) ((*  (ptr) pd290 ))))((* (( (ptr) (* (( (ptr) formal←c67196)+4) ))+36) ), 0, pd290);
         };
SOURCE(28275, 28)
      (* (( (ptr) (* (( (ptr) formal←c67196)+4) ))+36) ) = 0;
      };
SOURCE(28308, 6368)
   if ((0 == (word) RedisplayTool←P2880((* ((( (ptr) formal←c67196)+4)) )))) {
SOURCE(28340, 58)
      {
         word pd291;
         pd291 = (* (( (ptr) (* (( (ptr) gf←c67164)+237)/* var←c59100 */  ))+16) );
         (void) ( *( (fPt) ((*  (ptr) pd291 ))))((* (( (ptr) (* (( (ptr) formal←c67196)+4) ))+35) ), 1, 1, 0, pd291);
         };
      };
   }

static void StopButtonProc←P2580(parent←v45128, clientData←v45156, mouseButton←v45184, shift←v45212, control←v45240)
   word parent←v45128;
   word clientData←v45156;
   word mouseButton←v45184;
   word shift←v45212;
   word control←v45240;
   {
   register ptr gf←c67228 =  (ptr) &globalframe;
   word state←v14844;
   /* StopButtonProc: */ 
SOURCE(28536, 158)
SOURCE(28575, 41)
   state←v14844 = XR←Narrow(clientData←v45156, (* (( (ptr) gf←c67228)+27) ));
SOURCE(28618, 25)
   (* (( (ptr) state←v14844)+6) ) = 1;
SOURCE(28645, 49)
   {
      word pd292;
      pd292 = (* (( (ptr) (* (( (ptr) gf←c67228)+247)/* var←c60188 */  ))+7) );
      (void) ( *( (fPt) ((*  (ptr) pd292 ))))((* (( (ptr) state←v14844)+3) ), (* (( (ptr) gf←c67228)+59) ), 1, pd292);
      };
   }

static void SetSendingStatus←P2640(state←v10328)
   word state←v10328;
   {
   register ptr gf←c67260 =  (ptr) &globalframe;
   word w←v14888;
   /* SetSendingStatus: */ 
SOURCE(28700, 371)
SOURCE(28756, 41)
   w←v14888 = (((* (( (ptr) (* (( (ptr) state←v10328)+5) ))+1) ) - (* (( (ptr) (* (( (ptr) state←v10328)+4) ))+1) )) - 4);
SOURCE(28814, 34)
   {
      word pd293;
      pd293 = (* (( (ptr) (* (( (ptr) gf←c67260)+237)/* var←c59100 */  ))+15) );
      (void) ( *( (fPt) ((*  (ptr) pd293 ))))((* (( (ptr) state←v10328)+2) ), 1, pd293);
      };
SOURCE(28850, 15)
   (* (( (ptr) state←v10328)+2) ) = 0;
SOURCE(28867, 35)
   {
      word pd294;
      pd294 = (* (( (ptr) (* (( (ptr) gf←c67260)+237)/* var←c59100 */  ))+15) );
      (void) ( *( (fPt) ((*  (ptr) pd294 ))))((* (( (ptr) state←v10328)+3) ), 1, pd294);
      };
SOURCE(28904, 16)
   (* (( (ptr) state←v10328)+3) ) = 0;
SOURCE(28922, 100)
   {
      word pd295;
      pd295 = (* (( (ptr) (* (( (ptr) gf←c67260)+237)/* var←c59100 */  ))+14) );
      (void) ( *( (fPt) ((*  (ptr) pd295 ))))((* (( (ptr) state←v10328)+4) ), (* (( (ptr) (* (( (ptr) state←v10328)+4) ))+1) ), (* (
            ( (ptr) (* (( (ptr) state←v10328)+4) ))+2) ), w←v14888, (* (( (ptr) (* (( (ptr) state←v10328)+4) ))+4) ), 1, pd295);
      };
SOURCE(29024, 47)
   {
      word pd296;
      pd296 = (* (( (ptr) (* (( (ptr) gf←c67260)+256)/* var←c62556 */  ))+6) );
      (void) ( *( (fPt) ((*  (ptr) pd296 ))))((* (( (ptr) state←v10328)+4) ), (* (( (ptr) gf←c67260)+108) ), 1, pd296);
      };
   }

static void PrintStatusUpdate←P2700(request←v45300, clientData←v45328)
   word request←v45300;
   word clientData←v45328;
   {
   register ptr gf←c67292 =  (ptr) &globalframe;
   word state←v14932;
   word notExplicit←v14960;
   word msg←v14988;
   /* PrintStatusUpdate: */ 
SOURCE(29077, 5599)
SOURCE(29134, 41)
   state←v14932 = XR←Narrow(clientData←v45328, (* (( (ptr) gf←c67292)+27) ));
SOURCE(29177, 66)
   {
      word pd297;
      pd297 = (* (( (ptr) (* (( (ptr) gf←c67292)+235)/* var←c59004 */  ))+13) );
      notExplicit←v14960 = (word) ( *( (fPt) ((*  (ptr) pd297 ))))((* ((( (ptr) request←v45300)+10)) ), pd297);
      };
SOURCE(29268, 82)
   {
      word pd298;
      pd298 = (* (( (ptr) (* (( (ptr) gf←c67292)+257)/* var←c62940 */  ))+10) );
      msg←v14988 = (word) ( *( (fPt) ((*  (ptr) pd298 ))))((* (( (ptr) request←v45300)+9) ), 0, pd298);
      };
SOURCE(29352, 57)
   if (((* (( (ptr) state←v14932)+1) ) == 0) || (* (( (bPt) (* (( (ptr) state←v14932)+1) ))+77) ) & 0100) {
SOURCE(29403, 6)
      return;
      };
SOURCE(29411, 5265)
   if ((0 == notExplicit←v14960)) {
SOURCE(29432, 5244)
      {
         W2 var←c63388;
         W2 var←c63484;
         {
            W2 var←c63420;
            word v←v57052;
            v←v57052 = (* (( (ptr) (* (( (ptr) request←v45300)+1) ))+7) );
            var←c63420.f0 = 11;
            var←c63420.f1 = v←v57052;
            var←c63388 = var←c63420;
            };
         {
            W2 var←c63516;
            word v←v57004;
            v←v57004 = (* (( (ptr) request←v45300)+10) );
            var←c63516.f0 = 11;
            var←c63516.f1 = v←v57004;
            var←c63484 = var←c63516;
            };
         {
            W2 var←c63580;
            var←c63580.f0 = 11;
            var←c63580.f1 = msg←v14988;
            {
               word pd299;
               pd299 = (* (( (ptr) (* (( (ptr) gf←c67292)+239)/* var←c59292 */  ))+60) );
               (void) ( *( (fPt) ((*  (ptr) pd299 ))))((* (( (ptr) (*  (ptr) state←v14932 ))+9) ), (* (( (ptr) gf←c67292)+109) ), var←c63388, var←c63580, var←c63484, pd299)
               ;
               };
            };
         };
      };
SOURCE(29589, 5087)
   {
      word var←c63612;
      var←c63612 = (* (( (ptr) request←v45300)+9) );
      switch (var←c63612) {
         case 0: case 1: case 8: 
SOURCE(29656, 41)
            {
               word pd300;
               pd300 = (* (( (ptr) (* (( (ptr) gf←c67292)+256)/* var←c62556 */  ))+6) );
               (void) ( *( (fPt) ((*  (ptr) pd300 ))))((* (( (ptr) state←v14932)+4) ), msg←v14988, 1, pd300);
               };
            break;
         case 2: case 3: case 5: case 6: case 7: case 4: 
SOURCE(29819, 4857)
            if ((0 != notExplicit←v14960)) {
SOURCE(29839, 4837)
               {
                  W2 var←c63644;
                  {
                     W2 var←c63676;
                     word v←v56956;
                     v←v56956 = (* (( (ptr) (* (( (ptr) request←v45300)+1) ))+7) );
                     var←c63676.f0 = 11;
                     var←c63676.f1 = v←v56956;
                     var←c63644 = var←c63676;
                     };
                  {
                     W2 var←c63740;
                     W2 var←c0847;
                     var←c63740.f0 = 11;
                     var←c63740.f1 = msg←v14988;
                     (*  (ptr) (word) &var←c0847 ) = 0;
                     (* (( (ptr) (word) &var←c0847) + 1) ) = 0;
                     {
                        word pd301;
                        pd301 = (* (( (ptr) (* (( (ptr) gf←c67292)+239)/* var←c59292 */  ))+60) );
                        (void) ( *( (fPt) ((*  (ptr) pd301 ))))((* (( (ptr) (*  (ptr) state←v14932 ))+9) ), (* (( (ptr) gf←c67292)+110) ), var←c63644, var←c63740, var←c0847, pd301)
                        ;
                        };
                     };
                  };
               };
SOURCE(29937, 40)
            {
               word pd302;
               pd302 = (* (( (ptr) (* (( (ptr) gf←c67292)+236)/* var←c59068 */  ))+17) );
               (void) ( *( (fPt) ((*  (ptr) pd302 ))))(request←v45300, pd302);
               };
SOURCE(29979, 59)
            {
               word pd303;
               pd303 = (* (( (ptr) (* (( (ptr) gf←c67292)+237)/* var←c59100 */  ))+15) );
               (void) ( *( (fPt) ((*  (ptr) pd303 ))))((* (( (ptr) state←v14932)+1) ), 0, pd303);
               };
SOURCE(30040, 33)
            (void) ResizeStatusContainer←P2520((*  (ptr) (state←v14932) ));
SOURCE(30075, 21)
            (* (( (ptr) request←v45300)+1) ) = 0;
SOURCE(30121, 16)
            (*  (ptr) state←v14932 ) = 0;
            break;
         default: 
SOURCE(30153, 5)
            (void) XR←RaiseUnnamedError();
            break;
         };
      };
   }

static void PlaceChild←P2760(viewer←v10500, rank←v10528, minSize←v10556, maxSize←v10584)
   word viewer←v10500;
   word rank←v10528;
   word minSize←v10556;
   word maxSize←v10584;
   {
   register ptr gf←c67324 =  (ptr) &globalframe;
   /* PlaceChild: */ 
SOURCE(30482, 4194)
SOURCE(30564, 4112)
   {
      word var←c63804;
      {
         word var←c63836;
         var←c63836 = XR←NewObject(12, (* (( (ptr) gf←c67324)+26) ));
         (*  (ptr) var←c63836 ) = minSize←v10556;
         (* (( (ptr) var←c63836)+1) ) = maxSize←v10584;
         (* (( (ptr) var←c63836)+2) ) = rank←v10528;
         var←c63804 = var←c63836;
         };
      {
         word pd304;
         pd304 = (* (( (ptr) (* (( (ptr) gf←c67324)+237)/* var←c59100 */  ))+28) );
         (void) ( *( (fPt) ((*  (ptr) pd304 ))))(viewer←v10500, (* (( (ptr) gf←c67324)+111) ), var←c63804, pd304);
         };
      };
   }

static word XTSViewerAdjust←P2820(self←v45388)
   word self←v45388;
   {
   register ptr gf←c67356 =  (ptr) &globalframe;
   word adjusted←v45432;
   word head←v15088;
   word free←v15116;
   word sumDelta←v15144 = 0;
   word infinite←v15172 = 0;
   word curY←v15200 = 0;
   /* XTSViewerAdjust: */ 
SOURCE(30704, 3972)
SOURCE(30704, 3972)
   adjusted←v45432 = 0;
SOURCE(31087, 32)
   head←v15088 = XR←NewObject(20, (* (( (ptr) gf←c67356)+25) ));
   (* (( (ptr) head←v15088)+1) ) =  (word) -1;
SOURCE(31154, 19)
   free←v15116 = (* (( (ptr) self←v45388)+8) );
SOURCE(31466, 3210)
   {
      register word v←v15440;
      v←v15440 = (* (( (ptr) self←v45388)+24) );
      lab←L100085: ;
      if ((v←v15440 != 0)) {
         }
      else {
         goto lab←L100082;
         };
SOURCE(31535, 3141)
      if ((* (( (bPt) v←v15440)+77) ) & 0100) {
SOURCE(31555, 21)
         adjusted←v45432 = 1;
         }
      else {
SOURCE(31576, 3100)
         {
            word var←c63900;
            {
               word pd305;
               pd305 = (* (( (ptr) (* (( (ptr) gf←c67356)+237)/* var←c59100 */  ))+29) );
               var←c63900 = (word) ( *( (fPt) ((*  (ptr) pd305 ))))(v←v15440, (* (( (ptr) gf←c67356)+111) ), pd305);
               };
            if ((var←c63900 == 0)) {
               goto lab←L100086;
               };
            if (((* (( (ptr) gf←c67356)+26) ) == XR←GetReferentType(var←c63900))) {
               {
                  word positionInfo←v15484;
                  positionInfo←v15484 = var←c63900;
SOURCE(31678, 491)
                  {
                     word current←v15528;
SOURCE(31680, 153)
                     current←v15528 = XR←NewObject(20, (* (( (ptr) gf←c67356)+25) ));
                     (*  (ptr) current←v15528 ) = v←v15440;
                     (* (( (ptr) current←v15528)+1) ) = (* (( (ptr) positionInfo←v15484)+2) );
                     (* (( (ptr) current←v15528)+2) ) = (*  (ptr) positionInfo←v15484 );
                     (* (( (ptr) current←v15528)+3) ) = ((* (( (ptr) positionInfo←v15484)+1) ) - (*  (ptr) positionInfo←v15484 ));
SOURCE(31835, 37)
                     free←v15116 = (free←v15116 - ((* (( (ptr) current←v15528)+2) ) + 2));
SOURCE(31874, 57)
                     if (( (int)(* (( (ptr) current←v15528)+3) ) >  (int)0)) {
SOURCE(31898, 33)
                        sumDelta←v15144 = (sumDelta←v15144 + (* (( (ptr) current←v15528)+3) ));
                        };
SOURCE(31933, 45)
                     if (( (int)(* (( (ptr) current←v15528)+3) ) <  (int)0)) {
SOURCE(31957, 21)
                        infinite←v15172 = (infinite←v15172 + 1);
                        };
SOURCE(31980, 169)
                     {
                        register word e←v15572;
                        e←v15572 = head←v15088;
                        lab←L100090: ;
                        if ((e←v15572 != 0)) {
                           }
                        else {
                           goto lab←L100087;
                           };
SOURCE(32061, 88)
                        if (((* (( (ptr) e←v15572)+4) ) == 0) || ( (int)(* (( (ptr) (* (( (ptr) e←v15572)+4) ))+1) ) >  (int)(* (( (ptr) current←v15528)+1)
                         ))) {
SOURCE(32110, 21)
                           (* (( (ptr) current←v15528)+4) ) = (* (( (ptr) e←v15572)+4) );
SOURCE(32133, 16)
                           (* (( (ptr) e←v15572)+4) ) = current←v15528;
SOURCE(32151, 4)
                           goto lab←L100088;
                           };
                        e←v15572 = (* (( (ptr) e←v15572)+4) );
                        goto lab←L100090;
                        lab←L100087: ;
                        lab←L100088: ;
                        };
                     };
                  };
               }
            else {
               lab←L100086: ;
               };
            };
         };
      v←v15440 = (* (( (ptr) v←v15440)+23) );
      goto lab←L100085;
      lab←L100082: ;
      };
SOURCE(32249, 554)
   if (( (int)free←v15116 >  (int)0)) {
SOURCE(32264, 553)
      {
         word total←v15616;
SOURCE(32312, 33)
         total←v15616 = (MIN((int)(word), free←v15116, sumDelta←v15144));
SOURCE(32403, 190)
         {
            register word e←v15660;
            e←v15660 = (* (( (ptr) head←v15088)+4) );
            lab←L100094: ;
            if ((e←v15660 != 0)) {
               }
            else {
               goto lab←L100091;
               };
            {
               word add←v15704;
SOURCE(32491, 60)
               add←v15704 =  ( ( (int)(* (( (ptr) e←v15660)+3) ) >  (int)0) ? IOP2( / ,  (int)IOP2( * ,  (int)total←v15616,  (int)(* (( (ptr) e←v15660)+3)
                      )),  (int)sumDelta←v15144) : 0 ) ;
SOURCE(32553, 23)
               (* (( (ptr) e←v15660)+2) ) = ((* (( (ptr) e←v15660)+2) ) + add←v15704);
SOURCE(32578, 15)
               free←v15116 = (free←v15116 - add←v15704);
               };
            e←v15660 = (* (( (ptr) e←v15660)+4) );
            goto lab←L100094;
            lab←L100091: ;
            };
SOURCE(32604, 199)
         if ( ( ( (int)free←v15116 >  (int)0) ? ( (int)infinite←v15172 !=  (int)0) : 0 ) ) {
SOURCE(32634, 180)
            {
               word add←v15748;
SOURCE(32686, 24)
               add←v15748 = IOP2( / ,  (int)free←v15116,  (int)infinite←v15172);
SOURCE(32712, 91)
               {
                  register word e←v15792;
                  e←v15792 = (* (( (ptr) head←v15088)+4) );
                  lab←L100098: ;
                  if ((e←v15792 != 0)) {
                     }
                  else {
                     goto lab←L100095;
                     };
SOURCE(32762, 41)
                  if (( (int)(* (( (ptr) e←v15792)+3) ) <  (int)0)) {
SOURCE(32780, 23)
                     (* (( (ptr) e←v15792)+2) ) = ((* (( (ptr) e←v15792)+2) ) + add←v15748);
                     };
                  e←v15792 = (* (( (ptr) e←v15792)+4) );
                  goto lab←L100098;
                  lab←L100095: ;
                  };
               };
            };
         };
      };
SOURCE(32820, 302)
   {
      register word e←v15836;
      e←v15836 = (* (( (ptr) head←v15088)+4) );
      lab←L100102: ;
      if ((e←v15836 != 0)) {
         }
      else {
         goto lab←L100099;
         };
      {
         word ww←v15880;
SOURCE(32897, 35)
         {
            word x306;
            ww←v15880 = (x306 = ((* (( (ptr) self←v45388)+7) ) - (* (( (ptr) (*  (ptr) e←v15836 ))+1) )),
               MAX((int)(word), 5, x306));
            };
SOURCE(32934, 157)
         if ((( (int)(* (( (ptr) (*  (ptr) e←v15836 ))+2) ) !=  (int)curY←v15200) || ( (int)(* (( (ptr) (*  (ptr) e←v15836 ))+4) ) !=  (int)(* (
            ( (ptr) e←v15836)+2) ))) || ( (int)(* (( (ptr) (*  (ptr) e←v15836 ))+3) ) !=  (int)ww←v15880)) {
SOURCE(32988, 15)
            adjusted←v45432 = 1;
SOURCE(33005, 86)
            {
               word pd307;
               pd307 = (* (( (ptr) (* (( (ptr) gf←c67356)+237)/* var←c59100 */  ))+37) );
               (void) ( *( (fPt) ((*  (ptr) pd307 ))))((*  (ptr) e←v15836 ), (* (( (ptr) (*  (ptr) e←v15836 ))+1) ), curY←v15200, ww←v15880, (* (
                     ( (ptr) e←v15836)+2) ), pd307);
               };
            };
SOURCE(33096, 26)
         curY←v15200 = ((curY←v15200 + (* (( (ptr) e←v15836)+2) )) + 2);
         };
      e←v15836 = (* (( (ptr) e←v15836)+4) );
      goto lab←L100102;
      lab←L100099: ;
      };
SOURCE(30704, 3972)
   return(adjusted←v45432);
   }

static word RedisplayTool←P2880(formal←c0929)
   word formal←c0929;
   {
   W8 var←c67388;
   /* declaration of tool←v10644 skipped */ 
   register ptr gf←c67420 =  (ptr) &globalframe;
   /* declaration of painted←v10688 skipped */ 
   /* declaration of var←c63964 skipped */ 
   var←c67388.f4/* tool←v10644 */  = formal←c0929;
   /* RedisplayTool: */ 
SOURCE(33137, 1539)
   {
      word tmpAddr308;
      tmpAddr308 = (word) (( (ptr) &var←c67388)+6)/* var←c63964 */ ;
      (*  (ptr) tmpAddr308 ) = ( ((word)  (fPt) DoIt←P5136) );
      (* (( (ptr) tmpAddr308) + 1) ) = 1;
      };
SOURCE(33137, 1539)
   var←c67388.f5/* painted←v10688 */  = 0;
SOURCE(33348, 70)
   if (((* (( (ptr) var←c67388.f4/* tool←v10644 */ )+10) ) == 0) || (* (( (bPt) (* (( (ptr) var←c67388.f4/* tool←v10644 */ )+10)
       ))+77) ) & 0100) {
SOURCE(33397, 21)
      return(1);
      };
SOURCE(33439, 49)
   {
      word pd309;
      pd309 = (* (( (ptr) (* (( (ptr) gf←c67420)+259)/* var←c63356 */  ))+4) );
      (void) ( *( (fPt) ((*  (ptr) pd309 ))))((word) (( (bPt) &var←c67388)+24)/* var←c63964 */ , (* (( (ptr) var←c67388.f4/* tool←v10644 */ )+10)
          ), pd309);
      };
SOURCE(33137, 1539)
   return(var←c67388.f5/* painted←v10688 */ );
   }

static void DoIt←P5136(formal←c67484)
   word formal←c67484;
   {
   register ptr gf←c67452 =  (ptr) &globalframe;
   formal←c67484 = (formal←c67484 - 24);
   /* DoIt: */ 
SOURCE(33206, 1470)
SOURCE(33245, 1431)
   (* (( (ptr) formal←c67484)+5) ) = (word) XTSViewerAdjust←P2820((* ((( (ptr) (* (( (ptr) formal←c67484)+4) ))+10)) ));
SOURCE(33285, 58)
   if ((0 != (* (( (ptr) formal←c67484)+5) ))) {
SOURCE(33301, 42)
      {
         word pd310;
         pd310 = (* (( (ptr) (* (( (ptr) gf←c67452)+237)/* var←c59100 */  ))+16) );
         (void) ( *( (fPt) ((*  (ptr) pd310 ))))((* (( (ptr) (* (( (ptr) formal←c67484)+4) ))+10) ), 1, 1, 0, pd310);
         };
      };
   }

static void SetupPrinterVersion←P3000(tool←v10852)
   word tool←v10852;
   {
   register ptr gf←c67516 =  (ptr) &globalframe;
   word pVers←v15984;
   /* SetupPrinterVersion: */ 
SOURCE(33580, 1096)
SOURCE(33623, 84)
   {
      W2 var←c0563;
      word var←c0848;
      {
         word pd311;
         pd311 = (* (( (ptr) (* (( (ptr) gf←c67516)+260)/* var←c63996 */  ))+7) );
         (void) ( *( (fPt) ((*  (ptr) pd311 ))))((word) &var←c0563, (* (( (ptr) gf←c67516)+9)/* printerVersions←v4372 */  ), (* (( (ptr) tool←v10852)+4)
             ), pd311);
         };
      var←c0848 = var←c0563.f1;
      pVers←v15984 = XR←Narrow(var←c0848, (* (( (ptr) gf←c67516)+24) ));
      };
SOURCE(33709, 967)
   if ((pVers←v15984 == 0)) {
SOURCE(33727, 949)
      {
         W2 var←c0564;
         word var←c0849;
         {
            word pd312;
            pd312 = (* (( (ptr) (* (( (ptr) gf←c67516)+260)/* var←c63996 */  ))+7) );
            (void) ( *( (fPt) ((*  (ptr) pd312 ))))((word) &var←c0564, (* (( (ptr) gf←c67516)+10)/* ropeToVersion←v4400 */  ), (* (( (ptr) gf←c67516)+115)
                ), pd312);
            };
         var←c0849 = var←c0564.f1;
         pVers←v15984 = XR←Narrow(var←c0849, (* (( (ptr) gf←c67516)+24) ));
         };
      };
SOURCE(33790, 18)
   if ((pVers←v15984 == 0)) {
SOURCE(33808, 5)
      (void) XR←RaiseUnnamedError();
      };
SOURCE(33834, 20)
   (* (( (ptr) tool←v10852)+5) ) = pVers←v15984;
   }

static void DefinePrinterVersions←P3060(versions←v10912)
   word versions←v10912;
   {
   register ptr gf←c67548 =  (ptr) &globalframe;
   /* DefinePrinterVersions: */ 
SOURCE(33860, 816)
SOURCE(33917, 759)
   if (((* (( (ptr) gf←c67548)+9)/* printerVersions←v4372 */  ) == 0)) {
SOURCE(33945, 731)
      {
         word pd313;
         pd313 = (* (( (ptr) (* (( (ptr) gf←c67548)+260)/* var←c63996 */  ))+5) );
         (* (( (ptr) gf←c67548)+9)/* printerVersions←v4372 */  ) = (word) ( *( (fPt) ((*  (ptr) pd313 ))))(17, 0, pd313);
         };
      };
SOURCE(33991, 685)
   {
      register word l←v16028;
      l←v16028 = versions←v10912;
      lab←L100106: ;
      if ( ( (l←v16028 != 0) ? ((* (( (ptr) l←v16028)+1) ) != 0) : 0 ) ) {
         }
      else {
         goto lab←L100103;
         };
      {
         word name←v16156;
         word attribute←v16184;
         word version←v16212;
SOURCE(34064, 20)
         name←v16156 = (*  (ptr) l←v16028 );
SOURCE(34086, 30)
         attribute←v16184 = (*  (ptr) (* (( (ptr) l←v16028)+1) ) );
SOURCE(34118, 80)
         {
            W2 var←c0570;
            word var←c0850;
            {
               word pd314;
               pd314 = (* (( (ptr) (* (( (ptr) gf←c67548)+260)/* var←c63996 */  ))+7) );
               (void) ( *( (fPt) ((*  (ptr) pd314 ))))((word) &var←c0570, (* (( (ptr) gf←c67548)+10)/* ropeToVersion←v4400 */  ), (*  (ptr) (* (
                     ( (ptr) l←v16028)+1) ) ), pd314);
               };
            var←c0850 = var←c0570.f1;
            version←v16212 = XR←Narrow(var←c0850, (* (( (ptr) gf←c67548)+24) ));
            };
SOURCE(34200, 476)
         if ((version←v16212 == 0)) {
SOURCE(34220, 456)
            {
               W2 var←c0571;
               word var←c0851;
               {
                  word pd315;
                  pd315 = (* (( (ptr) (* (( (ptr) gf←c67548)+260)/* var←c63996 */  ))+7) );
                  (void) ( *( (fPt) ((*  (ptr) pd315 ))))((word) &var←c0571, (* (( (ptr) gf←c67548)+10)/* ropeToVersion←v4400 */  ), (* (( (ptr) gf←c67548)+115)
                      ), pd315);
                  };
               var←c0851 = var←c0571.f1;
               version←v16212 = XR←Narrow(var←c0851, (* (( (ptr) gf←c67548)+24) ));
               };
            };
SOURCE(34285, 391)
         {
            word var←c64028;
            word pd316;
            pd316 = (* (( (ptr) (* (( (ptr) gf←c67548)+260)/* var←c63996 */  ))+10) );
            var←c64028 = (word) ( *( (fPt) ((*  (ptr) pd316 ))))((* (( (ptr) gf←c67548)+9)/* printerVersions←v4372 */  ), name←v16156, version←v16212, pd316)
            ;
            };
         };
      l←v16028 = (* (( (ptr) (* (( (ptr) l←v16028)+1) ))+1) );
      goto lab←L100106;
      lab←L100103: ;
      };
   }

static void XTSetterCommand←P3120(formal←c0582, formal←c0930)
   word formal←c0582;
   word formal←c0930;
   {
   W102 var←c67580;
   /* declaration of cmd←v45656 skipped */ 
   register ptr gf←c67612 =  (ptr) &globalframe;
   word result←v45700;
   /* declaration of msg←v45728 skipped */ 
   (* (( (ptr) &var←c67580)+4)/* cmd←v45656 */  ) = formal←c0930;
   /* XTSetterCommand: */ 
SOURCE(34550, 367)
SOURCE(34550, 367)
   result←v45700 = 0;
SOURCE(34550, 367)
   (* (( (ptr) &var←c67580)+5)/* msg←v45728 */  ) = 0;
SOURCE(34591, 326)
SOURCE(34593, 17)
   {
      /* declaration of printer←v16256 skipped */ 
SOURCE(34593, 17)
      (* (( (ptr) &var←c67580)+6) ) = 0;
      (* (( (ptr) &var←c67580)+7) ) = 0;
      (* (( (ptr) &var←c67580)+8) ) = 0;
      (* (( (ptr) &var←c67580)+9) ) = (*  (ptr) &fc234 );
      (* (( (ptr) &var←c67580)+10) ) = 0;
SOURCE(34612, 64)
SOURCE(34612, 64)
      {
         W90 var←c64124;
         {
            /* declaration of var←c024 skipped */ 
            (* (( (ptr) &var←c67580)+11)/* var←c024 */  ) = (* (( (ptr) (* (( (ptr) gf←c67612)+261)/* var←c64092 */  ))+12) );
            {
               /* declaration of var←c025 skipped */ 
               {
                  word var←c026;
                  {
                     word var←c0852;
                     var←c0852 = (word) &var←c67580;
                     var←c026 = (word) XR←Enable(( ((word)  (fPt) NoName←Q7092) ), ( ((word)  (fPt) NoName←Q7212) ), var←c0852);
                     };
                  if ((var←c026 == 9)) {
                     goto lab←L100110;
                     };
                  };
               var←c64124 = (*  (W90Pt) (( (ptr) &var←c67580)+12)/* var←c025 */  );
               };
            };
         (*  (W5Pt) (( (ptr) &var←c67580)+6)/* printer←v16256 */  ) = (*  (W5Pt) &var←c64124 );
         };
      lab←L100110: ;
SOURCE(34690, 44)
      if (((* (( (ptr) &var←c67580)+5)/* msg←v45728 */  ) != 0)) {
SOURCE(34708, 26)
         result←v45700 = (* (( (ptr) gf←c67612)+117) );
         (* (( (ptr) &var←c67580)+5)/* msg←v45728 */  ) = (* (( (ptr) gf←c67612)+15)/* cmdUsage←v6108 */  );
         goto lab←L100107;
         };
SOURCE(34736, 84)
      {
         word pd317;
         pd317 = (* (( (ptr) (* (( (ptr) gf←c67612)+235)/* var←c59004 */  ))+13) );
         if ((0 != (word) ( *( (fPt) ((*  (ptr) pd317 ))))((* ((( (ptr) &var←c67580)+10)) ), pd317))) {
SOURCE(34771, 49)
            {
               word pd318;
               pd318 = (* (( (ptr) (* (( (ptr) gf←c67612)+236)/* var←c59068 */  ))+12) );
               (* (( (ptr) &var←c67580)+10) ) = (* (( (ptr) ( *( (fPt) ((*  (ptr) pd318 ))))(0, pd318))+5) );
               };
            };
         };
SOURCE(34822, 46)
      {
         word var←c64220;
         {
            /* declaration of var←c027 skipped */ 
            (* (( (ptr) &var←c67580)+11)/* var←c027 */  ) = (* (( (ptr) (* (( (ptr) &var←c67580)+4)/* cmd←v45656 */  ))+2) );
            {
               /* declaration of var←c028 skipped */ 
               {
                  word var←c029;
                  {
                     word var←c0853;
                     var←c0853 = (word) &var←c67580;
                     var←c029 = (word) XR←Enable(( ((word)  (fPt) NoName←Q7032) ), ( ((word)  (fPt) NoName←Q7152) ), var←c0853);
                     };
                  if ((var←c029 == 10)) {
                     goto lab←L100108;
                     };
                  };
               var←c64220 = (* (( (ptr) &var←c67580)+12)/* var←c028 */  );
               };
            };
         };
      };
   goto lab←L100115;
   lab←L100108: ;
SOURCE(34898, 17)
   result←v45700 = (* (( (ptr) gf←c67612)+117) );
   (* (( (ptr) &var←c67580)+5)/* msg←v45728 */  ) = 0;
   goto lab←L100107;
   lab←L100115: ;
   /* removed tail goto */ 
   lab←L100107: ;
   (*  (ptr) formal←c0582 ) = result←v45700;
   (* (( (ptr) formal←c0582)+1) ) = (* (( (ptr) &var←c67580)+5)/* msg←v45728 */  );
   return;
   }

static word NoName←Q7032(formal←c0813)
   word formal←c0813;
   {
SOURCE(34822, 46)
   (* (( (ptr) formal←c0813)+12) ) = (word) NewTool←P120((* (( (ptr) formal←c0813)+10) ), (* (( (ptr) formal←c0813)+11) ));
   return(0);
   }

static word NoName←Q7092(formal←c0815)
   word formal←c0815;
   {
   register ptr gf←c0814 =  (ptr) &globalframe;
SOURCE(34612, 64)
   {
      word pd319;
      pd319 = (* (( (ptr) formal←c0815)+11) );
      (void) ( *( (fPt) ((*  (ptr) pd319 ))))((word) (( (bPt) formal←c0815)+48), (* (( (ptr) formal←c0815)+4) ), (* (( (ptr) gf←c0814)+116)
          ), 0, pd319);
      };
   return(0);
   }

static void NewProfile←P3180(reason←v45788)
   word reason←v45788;
   {
   /* NewProfile: */ 
SOURCE(34921, 74)
SOURCE(34968, 27)
   (void) DefaultOptionsFromProfile←P2220();
   }

static void NewUser←P3240(new←v45848, clientData←v45876)
   word new←v45848;
   word clientData←v45876;
   {
   /* NewUser: */ 
SOURCE(35001, 80)
SOURCE(35054, 27)
   (void) DefaultOptionsFromProfile←P2220();
   }

static void Init←P3300()
   {
   W6 var←c67644;
   register ptr gf←c67676 =  (ptr) &globalframe;
   /* declaration of var←c64284 skipped */ 
   /* Init: */ 
SOURCE(35087, 1080)
   {
      word tmpAddr320;
      tmpAddr320 = (word) (( (ptr) &var←c67644)+4)/* var←c64284 */ ;
      (*  (ptr) tmpAddr320 ) = ( ((word)  (fPt) Define←P5340) );
      (* (( (ptr) tmpAddr320) + 1) ) = 1;
      };
SOURCE(35364, 58)
   {
      word pd321;
      pd321 = (* (( (ptr) (* (( (ptr) gf←c67676)+262)/* var←c64316 */  ))+6) );
      (* (( (ptr) gf←c67676)+4)/* xTSViewerIcon←v4232 */  ) = (word) ( *( (fPt) ((*  (ptr) pd321 ))))((* (( (ptr) gf←c67676)+118)
          ), 0, pd321);
      };
SOURCE(35424, 122)
   {
      word var←c64348;
      var←c64348 = XR←NewObject(80, (* (( (ptr) gf←c67676)+23) ));
      (* (( (ptr) var←c64348)+1) ) = XR←CheckProc(0);
      (* (( (ptr) var←c64348)+2) ) = XR←CheckProc(0);
      (* (( (ptr) var←c64348)+3) ) = XR←CheckProc(0);
      (* (( (ptr) var←c64348)+4) ) = XR←CheckProc(0);
      (* (( (ptr) var←c64348)+5) ) = XR←CheckProc(0);
      (* (( (ptr) var←c64348)+6) ) = XR←CheckProc(0);
      (* (( (ptr) var←c64348)+7) ) = XR←CheckProc(0);
      (* (( (ptr) var←c64348)+8) ) = XR←CheckProc(0);
      (* (( (ptr) var←c64348)+9) ) = XR←CheckProc(0);
      (* (( (ptr) var←c64348)+10) ) = XR←CheckProc(0);
      (* (( (ptr) var←c64348)+11) ) = XR←CheckProc(0);
      (* (( (ptr) var←c64348)+12) ) = XR←CheckProc(0);
      (* (( (ptr) var←c64348)+13) ) = (word) (( (bPt) gf←c67676)+556)/* var←c57404 */ ;
      ((P1x0b) (( (bPt) var←c64348) + 64))->f = 1;
      (* (( (ptr) var←c64348)+17) ) = (* (( (ptr) gf←c67676)+4)/* xTSViewerIcon←v4232 */  );
      (* (( (ptr) var←c64348)+18) ) = 26;
      (* (( (ptr) gf←c67676)+5)/* xTSViewerClass←v4260 */  ) = var←c64348;
      };
SOURCE(35548, 56)
   {
      word pd322;
      pd322 = (* (( (ptr) (* (( (ptr) gf←c67676)+237)/* var←c59100 */  ))+4) );
      (void) ( *( (fPt) ((*  (ptr) pd322 ))))((* (( (ptr) gf←c67676)+40) ), (* (( (ptr) gf←c67676)+5)/* xTSViewerClass←v4260 */  ), pd322)
      ;
      };
SOURCE(35606, 42)
   {
      word pd323;
      pd323 = (* (( (ptr) (* (( (ptr) gf←c67676)+260)/* var←c63996 */  ))+5) );
      (* (( (ptr) gf←c67676)+10)/* ropeToVersion←v4400 */  ) = (word) ( *( (fPt) ((*  (ptr) pd323 ))))(17, 0, pd323);
      };
SOURCE(35650, 46)
   {
      W2 var←c64380;
      var←c64380.f0 = 3;
      var←c64380.f1 = 0;
      (void) Define←P5340((* (( (ptr) gf←c67676)+115) ), var←c64380, 1, 0, 1, (word) (( (bPt) &var←c67644)+16)/* var←c64284 */ )
      ;
      };
SOURCE(35738, 44)
   {
      W2 var←c64412;
      var←c64412.f0 = 3;
      var←c64412.f1 = 0;
      (void) Define←P5340((* (( (ptr) gf←c67676)+106) ), var←c64412, 1, 0, 1, (word) (( (bPt) &var←c67644)+16)/* var←c64284 */ )
      ;
      };
SOURCE(35793, 43)
   {
      W2 var←c64444;
      var←c64444.f0 = 3;
      var←c64444.f1 = 0;
      (void) Define←P5340((* (( (ptr) gf←c67676)+113) ), var←c64444, 1, 1, 0, (word) (( (bPt) &var←c67644)+16)/* var←c64284 */ )
      ;
      };
SOURCE(35848, 46)
   {
      W2 var←c64476;
      var←c64476.f0 = 2;
      var←c64476.f1 = 1;
      (void) Define←P5340((* (( (ptr) gf←c67676)+119) ), var←c64476, 0, 0, 0, (word) (( (bPt) &var←c67644)+16)/* var←c64284 */ )
      ;
      };
SOURCE(35909, 42)
   {
      W2 var←c64508;
      var←c64508.f0 = 1;
      var←c64508.f1 = 0;
      (void) Define←P5340((* (( (ptr) gf←c67676)+122) ), var←c64508, 0, 0, 0, (word) (( (bPt) &var←c67644)+16)/* var←c64284 */ )
      ;
      };
SOURCE(35964, 39)
   (void) DefinePrinterVersions←P3060((* ((( (ptr) gf←c67676)+11)/* standardVersions←v4428 */ ) ));
SOURCE(36005, 46)
   {
      word pd324;
      pd324 = (* (( (ptr) (* (( (ptr) gf←c67676)+254)/* var←c62044 */  ))+12) );
      (void) ( *( (fPt) ((*  (ptr) pd324 ))))((word) ((( (bPt) gf←c67676)+516)/* var←c57244 */ ), pd324);
      };
SOURCE(36053, 41)
   {
      word pd325;
      pd325 = (* (( (ptr) (* (( (ptr) gf←c67676)+263)/* var←c64540 */  ))+8) );
      (void) ( *( (fPt) ((*  (ptr) pd325 ))))((word) (( (bPt) gf←c67676)+508)/* var←c57212 */ , 0, pd325);
      };
SOURCE(36096, 71)
   {
      word pd326;
      pd326 = (* (( (ptr) (* (( (ptr) gf←c67676)+264)/* var←c64572 */  ))+4) );
      (void) ( *( (fPt) ((*  (ptr) pd326 ))))((* (( (ptr) gf←c67676)+123) ), (word) (( (bPt) gf←c67676)+524)/* var←c57276 */ , (* (
            ( (ptr) gf←c67676)+62) ), 0, 1, pd326);
      };
   }

static void Define←P5340(type←v16376, version←v16404, mayCompress←v16432, shouldCompress←v16460, hasPressFonts←v16488, formal←c67740)
   word type←v16376;
   W2 version←v16404;
   word mayCompress←v16432;
   word shouldCompress←v16460;
   word hasPressFonts←v16488;
   word formal←c67740;
   {
   register ptr gf←c67708 =  (ptr) &globalframe;
   formal←c67740 = (formal←c67740 - 16);
   /* Define: */ 
SOURCE(35105, 254)
SOURCE(35224, 135)
   {
      word var←c64668;
      {
         word var←c64604;
         {
            word var←c64636;
            var←c64636 = XR←NewObject(20, (* (( (ptr) gf←c67708)+24) ));
            (*  (W2Pt) var←c64636 ) = version←v16404;
            (* (( (ptr) var←c64636)+2) ) = mayCompress←v16432;
            (* (( (ptr) var←c64636)+3) ) = ((0 != mayCompress←v16432) && (0 != shouldCompress←v16460));
            (* (( (ptr) var←c64636)+4) ) = hasPressFonts←v16488;
            var←c64604 = var←c64636;
            };
         {
            word pd327;
            pd327 = (* (( (ptr) (* (( (ptr) gf←c67708)+260)/* var←c63996 */  ))+10) );
            var←c64668 = (word) ( *( (fPt) ((*  (ptr) pd327 ))))((* (( (ptr) gf←c67708)+10)/* ropeToVersion←v4400 */  ), type←v16376, var←c64604, pd327)
            ;
            };
         };
      };
   }

static void NoName←Q7152(formal←c0607, formal←c200076, formal←c200077, formal←c200078, formal←c200079)
   word formal←c0607;
   word formal←c200076;
   word formal←c200077;
   word formal←c200078;
   word formal←c200079;
   {
   register ptr gf←c0819 =  (ptr) &globalframe;
   if ((formal←c200077 == (word) (( (bPt) gf←c0819)+496)/* var←c57148 */ )) {
      {
         word why←v53072;
         why←v53072 = (*  (ptr) formal←c200079 );
SOURCE(34868, 12)
         (*  (ptr) formal←c0607 ) = 2;
         (* (( (ptr) formal←c0607)+1) ) = 10;
         return;
         };
      };
   (*  (ptr) formal←c0607 ) = 0;
   (* (( (ptr) formal←c0607)+1) ) = 0;
   return;
   }

static void NoName←Q7212(formal←c0613, formal←c200072, formal←c200073, formal←c200074, formal←c200075)
   word formal←c0613;
   word formal←c200072;
   word formal←c200073;
   word formal←c200074;
   word formal←c200075;
   {
   register ptr gf←c0820 =  (ptr) &globalframe;
   if ((formal←c200073 == (* (( (ptr) (* (( (ptr) gf←c0820)+261)/* var←c64092 */  ))+11) ))) {
      {
         word reason←v52980;
         reason←v52980 = (*  (ptr) formal←c200075 );
SOURCE(34664, 12)
         (* (( (ptr) formal←c200072)+5) ) = reason←v52980;
SOURCE(34678, 8)
         (*  (ptr) formal←c0613 ) = 2;
         (* (( (ptr) formal←c0613)+1) ) = 9;
         return;
         };
      };
   (*  (ptr) formal←c0613 ) = 0;
   (* (( (ptr) formal←c0613)+1) ) = 0;
   return;
   }

static void NoName←Q7272(formal←c0618, formal←c200068, formal←c200069, formal←c200070, formal←c200071)
   word formal←c0618;
   word formal←c200068;
   word formal←c200069;
   word formal←c200070;
   word formal←c200071;
   {
   if ((formal←c200069 == XR←Unwind)) {
      (void) (XR←MonitorExit(* (( (ptr) formal←c200068)+4) ));
      };
   (*  (ptr) formal←c0618 ) = 0;
   (* (( (ptr) formal←c0618)+1) ) = 0;
   return;
   }

static void NoName←Q7332(formal←c0623, formal←c200064, formal←c200065, formal←c200066, formal←c200067)
   word formal←c0623;
   word formal←c200064;
   word formal←c200065;
   word formal←c200066;
   word formal←c200067;
   {
   if ((formal←c200065 == XR←Unwind)) {
      (void) (XR←MonitorExit(* (( (ptr) formal←c200064)+4) ));
      };
   (*  (ptr) formal←c0623 ) = 0;
   (* (( (ptr) formal←c0623)+1) ) = 0;
   return;
   }

static void NoName←Q7392(formal←c0628, formal←c200060, formal←c200061, formal←c200062, formal←c200063)
   word formal←c0628;
   word formal←c200060;
   word formal←c200061;
   word formal←c200062;
   word formal←c200063;
   {
   if ((formal←c200061 == XR←Unwind)) {
      (void) (XR←MonitorExit(* (( (ptr) formal←c200060)+4) ));
      };
   (*  (ptr) formal←c0628 ) = 0;
   (* (( (ptr) formal←c0628)+1) ) = 0;
   return;
   }

static void NoName←Q7452(formal←c0636, formal←c200056, formal←c200057, formal←c200058, formal←c200059)
   word formal←c0636;
   word formal←c200056;
   word formal←c200057;
   word formal←c200058;
   word formal←c200059;
   {
   register ptr gf←c0821 =  (ptr) &globalframe;
   if ((formal←c200057 == (* (( (ptr) (* (( (ptr) gf←c0821)+236)/* var←c59068 */  ))+4) ))) {
      {
         word problem←v51624;
         word explanation←v51652;
         problem←v51624 = (*  (ptr) formal←c200059 );
         explanation←v51652 = (* (( (ptr) formal←c200059)+1) );
SOURCE(24694, 9982)
         {
            W2 var←c62876;
            var←c62876.f0 = 11;
            var←c62876.f1 = explanation←v51652;
            {
               word pd328;
               pd328 = (* (( (ptr) (* (( (ptr) gf←c0821)+239)/* var←c59292 */  ))+61) );
               (void) ( *( (fPt) ((*  (ptr) pd328 ))))((* (( (ptr) (* (( (ptr) formal←c200056)+4) ))+9) ), (* (( (ptr) gf←c0821)+102) ), var←c62876, pd328)
               ;
               };
            };
SOURCE(24767, 22)
         (* (( (ptr) formal←c200056)+11) ) = 0;
SOURCE(24791, 8)
         (*  (ptr) formal←c0636 ) = 2;
         (* (( (ptr) formal←c0636)+1) ) = 8;
         return;
         };
      };
   (*  (ptr) formal←c0636 ) = 0;
   (* (( (ptr) formal←c0636)+1) ) = 0;
   return;
   }

static void NoName←Q7512(formal←c0641, formal←c200052, formal←c200053, formal←c200054, formal←c200055)
   word formal←c0641;
   word formal←c200052;
   word formal←c200053;
   word formal←c200054;
   word formal←c200055;
   {
   if ((formal←c200053 == XR←Unwind)) {
      (void) (XR←MonitorExit(* (( (ptr) formal←c200052)+4) ));
      };
   (*  (ptr) formal←c0641 ) = 0;
   (* (( (ptr) formal←c0641)+1) ) = 0;
   return;
   }

static void NoName←Q7572(formal←c0646, formal←c200048, formal←c200049, formal←c200050, formal←c200051)
   word formal←c0646;
   word formal←c200048;
   word formal←c200049;
   word formal←c200050;
   word formal←c200051;
   {
   if ((formal←c200049 == XR←Unwind)) {
      (void) (XR←MonitorExit(* (( (ptr) formal←c200048)+4) ));
      };
   (*  (ptr) formal←c0646 ) = 0;
   (* (( (ptr) formal←c0646)+1) ) = 0;
   return;
   }

static void NoName←Q7632(formal←c0651, formal←c200040, formal←c200041, formal←c200042, formal←c200043)
   word formal←c0651;
   word formal←c200040;
   word formal←c200041;
   word formal←c200042;
   word formal←c200043;
   {
   if ((formal←c200041 == XR←Unwind)) {
      (void) (XR←MonitorExit(* (( (ptr) formal←c200040)+4) ));
      };
   (*  (ptr) formal←c0651 ) = 0;
   (* (( (ptr) formal←c0651)+1) ) = 0;
   return;
   }

static void NoName←Q7692(formal←c0656, formal←c200044, formal←c200045, formal←c200046, formal←c200047)
   word formal←c0656;
   word formal←c200044;
   word formal←c200045;
   word formal←c200046;
   word formal←c200047;
   {
   register ptr gf←c0822 =  (ptr) &globalframe;
   if ((formal←c200045 == (* (( (ptr) (* (( (ptr) gf←c0822)+252)/* var←c61436 */  ))+11) ))) {
SOURCE(19925, 9)
      (*  (ptr) formal←c0656 ) = 2;
      (* (( (ptr) formal←c0656)+1) ) = 7;
      return;
      };
   (*  (ptr) formal←c0656 ) = 0;
   (* (( (ptr) formal←c0656)+1) ) = 0;
   return;
   }

static void NoName←Q7752(formal←c0661, formal←c200036, formal←c200037, formal←c200038, formal←c200039)
   word formal←c0661;
   word formal←c200036;
   word formal←c200037;
   word formal←c200038;
   word formal←c200039;
   {
   if ((formal←c200037 == XR←Unwind)) {
      (void) (XR←MonitorExit(* (( (ptr) formal←c200036)+4) ));
      };
   (*  (ptr) formal←c0661 ) = 0;
   (* (( (ptr) formal←c0661)+1) ) = 0;
   return;
   }

static void NoName←Q7812(formal←c0666, formal←c200032, formal←c200033, formal←c200034, formal←c200035)
   word formal←c0666;
   word formal←c200032;
   word formal←c200033;
   word formal←c200034;
   word formal←c200035;
   {
   if ((formal←c200033 == XR←Unwind)) {
      (void) (XR←MonitorExit(* (( (ptr) formal←c200032)+4) ));
      };
   (*  (ptr) formal←c0666 ) = 0;
   (* (( (ptr) formal←c0666)+1) ) = 0;
   return;
   }

static void NoName←Q7872(formal←c0671, formal←c200028, formal←c200029, formal←c200030, formal←c200031)
   word formal←c0671;
   word formal←c200028;
   word formal←c200029;
   word formal←c200030;
   word formal←c200031;
   {
   if ((formal←c200029 == XR←Unwind)) {
      (void) (XR←MonitorExit(* (( (ptr) formal←c200028)+4) ));
      };
   (*  (ptr) formal←c0671 ) = 0;
   (* (( (ptr) formal←c0671)+1) ) = 0;
   return;
   }

static void NoName←Q7932(formal←c0678, formal←c200024, formal←c200025, formal←c200026, formal←c200027)
   word formal←c0678;
   word formal←c200024;
   word formal←c200025;
   word formal←c200026;
   word formal←c200027;
   {
   register ptr gf←c0823 =  (ptr) &globalframe;
   if ((formal←c200025 == (* (( (ptr) (* (( (ptr) gf←c0823)+248)/* var←c60412 */  ))+7) ))) {
      {
         word reason←v50284;
         word index←v50312;
         reason←v50284 = (*  (ptr) formal←c200027 );
         index←v50312 = (* (( (ptr) formal←c200027)+1) );
SOURCE(11971, 9)
         (*  (ptr) formal←c0678 ) = 2;
         (* (( (ptr) formal←c0678)+1) ) = 6;
         return;
         };
      };
   (*  (ptr) formal←c0678 ) = 0;
   (* (( (ptr) formal←c0678)+1) ) = 0;
   return;
   }

static void NoName←Q7992(formal←c0685, formal←c200020, formal←c200021, formal←c200022, formal←c200023)
   word formal←c0685;
   word formal←c200020;
   word formal←c200021;
   word formal←c200022;
   word formal←c200023;
   {
   register ptr gf←c0824 =  (ptr) &globalframe;
   if ((formal←c200021 == (* (( (ptr) (* (( (ptr) gf←c0824)+248)/* var←c60412 */  ))+7) ))) {
      {
         word reason←v50100;
         word index←v50128;
         reason←v50100 = (*  (ptr) formal←c200023 );
         index←v50128 = (* (( (ptr) formal←c200023)+1) );
SOURCE(10763, 9)
         (*  (ptr) formal←c0685 ) = 2;
         (* (( (ptr) formal←c0685)+1) ) = 5;
         return;
         };
      };
   (*  (ptr) formal←c0685 ) = 0;
   (* (( (ptr) formal←c0685)+1) ) = 0;
   return;
   }

static void NoName←Q8052(formal←c0691, formal←c200016, formal←c200017, formal←c200018, formal←c200019)
   word formal←c0691;
   word formal←c200016;
   word formal←c200017;
   word formal←c200018;
   word formal←c200019;
   {
   register ptr gf←c0825 =  (ptr) &globalframe;
   if ((formal←c200017 == (* (( (ptr) (* (( (ptr) gf←c0825)+245)/* var←c59996 */  ))+9) ))) {
      {
         W4 error←v49516;
         error←v49516 = (*  (W4Pt) formal←c200019 );
SOURCE(7307, 12)
         (*  (ptr) formal←c0691 ) = 2;
         (* (( (ptr) formal←c0691)+1) ) = 4;
         return;
         };
      };
   (*  (ptr) formal←c0691 ) = 0;
   (* (( (ptr) formal←c0691)+1) ) = 0;
   return;
   }

static void NoName←Q8112(formal←c0697, formal←c200012, formal←c200013, formal←c200014, formal←c200015)
   word formal←c0697;
   word formal←c200012;
   word formal←c200013;
   word formal←c200014;
   word formal←c200015;
   {
   register ptr gf←c0826 =  (ptr) &globalframe;
   if ((formal←c200013 == (* (( (ptr) (* (( (ptr) gf←c0826)+245)/* var←c59996 */  ))+9) ))) {
      {
         W4 error←v48980;
         error←v48980 = (*  (W4Pt) formal←c200015 );
SOURCE(8193, 30)
         (void) InvalidFile←P3648(error←v48980.f2, (word) (( (bPt) formal←c200012)+16));
SOURCE(8225, 12)
         (*  (ptr) formal←c0697 ) = 2;
         (* (( (ptr) formal←c0697)+1) ) = 3;
         return;
         };
      };
   (*  (ptr) formal←c0697 ) = 0;
   (* (( (ptr) formal←c0697)+1) ) = 0;
   return;
   }

static void NoName←Q8172(formal←c0703, formal←c200008, formal←c200009, formal←c200010, formal←c200011)
   word formal←c0703;
   word formal←c200008;
   word formal←c200009;
   word formal←c200010;
   word formal←c200011;
   {
   register ptr gf←c0827 =  (ptr) &globalframe;
   if ((formal←c200009 == (word) (( (bPt) gf←c0827)+496)/* var←c57148 */ )) {
      {
         word why←v48148;
         why←v48148 = (*  (ptr) formal←c200011 );
SOURCE(6370, 9)
         (*  (ptr) formal←c0703 ) = 2;
         (* (( (ptr) formal←c0703)+1) ) = 2;
         return;
         };
      };
   (*  (ptr) formal←c0703 ) = 0;
   (* (( (ptr) formal←c0703)+1) ) = 0;
   return;
   }

static void NoName←Q8232(formal←c0708, formal←c200004, formal←c200005, formal←c200006, formal←c200007)
   word formal←c0708;
   word formal←c200004;
   word formal←c200005;
   word formal←c200006;
   word formal←c200007;
   {
   if ((formal←c200005 == XR←Unwind)) {
      (void) (XR←MonitorExit(* (( (ptr) formal←c200004)+4) ));
      };
   (*  (ptr) formal←c0708 ) = 0;
   (* (( (ptr) formal←c0708)+1) ) = 0;
   return;
   }

static void NoName←Q8292(formal←c0718, formal←c200000, formal←c200001, formal←c200002, formal←c200003)
   word formal←c0718;
   word formal←c200000;
   word formal←c200001;
   word formal←c200002;
   word formal←c200003;
   {
   register ptr gf←c0828 =  (ptr) &globalframe;
   if ((formal←c200001 == (* (( (ptr) (* (( (ptr) gf←c0828)+236)/* var←c59068 */  ))+4) ))) {
      {
         word problem←v46444;
         word explanation←v46472;
         problem←v46444 = (*  (ptr) formal←c200003 );
         explanation←v46472 = (* (( (ptr) formal←c200003)+1) );
SOURCE(3871, 30805)
         {
            W2 var←c59196;
            W2 var←c59228;
            W2 var←c0854;
            var←c59196.f0 = 11;
            var←c59196.f1 = (* (( (ptr) formal←c200000)+4) );
            var←c59228.f0 = 11;
            var←c59228.f1 = explanation←v46472;
            (*  (ptr) (word) &var←c0854 ) = 0;
            (* (( (ptr) (word) &var←c0854) + 1) ) = 0;
            {
               word pd329;
               pd329 = (* (( (ptr) (* (( (ptr) gf←c0828)+239)/* var←c59292 */  ))+60) );
               (void) ( *( (fPt) ((*  (ptr) pd329 ))))((* (( (ptr) formal←c200000)+5) ), (* (( (ptr) gf←c0828)+57) ), var←c59196, var←c59228, var←c0854, pd329)
               ;
               };
            };
SOURCE(3967, 18)
         {
            word pd330;
            pd330 = (* (( (ptr) (* (( (ptr) gf←c0828)+239)/* var←c59292 */  ))+25) );
            (void) ( *( (fPt) ((*  (ptr) pd330 ))))((* ((( (ptr) formal←c200000)+5)) ), pd330);
            };
SOURCE(3987, 30689)
         {
            word var←c0717;
            var←c0717 = explanation←v46472;
            (void) XR←RaiseError((word) (( (bPt) gf←c0828)+496)/* var←c57148 */ , (word) &var←c0717);
            };
         };
      };
   (*  (ptr) formal←c0718 ) = 0;
   (* (( (ptr) formal←c0718)+1) ) = 0;
   return;
   }

static word NoName←Q8352(formal←c0447)
   word formal←c0447;
   {
   W2 var←c0449;
   word var←c0448;
   /* intermediary proc for a FORK, nArgs: 2, nRets: 0 */ 
   var←c0449 = (*  (W2Pt) (( (ptr) formal←c0447)+4) );
   var←c0448 = (* (( (ptr) formal←c0447)+2) );
   formal←c0447 = XR←ExtensionFree(formal←c0447);
   (void) ( *( (fPt) ((*  (ptr) var←c0448 ))))(var←c0449.f0, var←c0449.f1, var←c0448);
   return(0);
   }

/* file: XTSetterImpl, module: XTSetterImpl, compiled at: August 31, 1992 8:43:37 pm PDT */ 
extern void XR←install←XTSetterImpl() {
   NoName←Q5892();
   }
extern void XR←run←XTSetterImpl() { XR←Start(&globalframe); }