/* Generated with C2C (Cedar To C)*/
/* Copyright (C) 1992 by Xerox Corporation. All rights reserved. */
/* time: June 7, 1992 11:36:22 am PDT */
/* C2C version: October 16, 1990 (native) */
/* ref-counting: off */
/* file: VoiceRecordImpl, module: VoiceRecordImpl */
/* switches: bcfhklnouw */
#include <cedar/InstallationSupport.h>
#include <cedar/CedarExtra.h>
static char versionStamp[] = "@(#)mob←version [2000087933,1528061937] VoiceRecordImpl";
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 {W8 f; W8 r;} W16;
typedef struct {W16 f; word r;} W17;
typedef struct {word f0, f1;} W2;
typedef W2 *W2Pt;
typedef struct {word f0, f1, f2;} W3;
typedef struct {word f0, f1, f2, f3, f4, f5;} W6;
typedef struct {word f0, f1, f2, f3, f4;} W5;
typedef struct {W8 f; W5 r;} W13;
typedef W3 *W3Pt;
typedef struct {W8 f; word r;} W9;
#define SOURCE(p, l) /* source p, l */
#define MAX(cast, x, y) ( ( cast x) > ( cast y) ? (x) : (y) )
#define IOP2(op, x, y) ( (word) ((x) op (y)) )
static void NoName←Q1920();
static void VoiceRecordImpl←P0();
static word RecordingInProgress←P60();
static void CancelProc←P120();
static void AddVoiceProc←P180();
static word PrepareSelection←P240();
static word NoName←Q1980();
static void DoIt←P1140();
static void BlinkMessageWindow←P300();
static void StartRecording←P360();
static void RecordNewRope←P420();
static void BroadcastRecordingDone←P1248();
static void RecordingTimer←P480();
static word IncrementRecordTimer←P540();
static void NewRecordingMarker←P600();
static void DoIt←P1356();
static void StopRecording←P660();
static word NoName←Q2040();
static void AddVoice←P1512();
static void NewDictationWindow←P720();
static void DictationMachine←P780();
static void ChangeVoiceInputFocus←P840();
static void AddVoiceWindowMarker←P1812();
static void RecordInPlaceOfSelection←P900();
static void ForkStopRecording←P960();
static void ConversationReport←P1020();
static word RequestReport←P1080();
static void NoName←Q2100();
static void NoName←Q2160();
static word NoName←Q2220();
static word NoName←Q2280();
static word NoName←Q2340();
static struct {unsigned f; char r[4];} string1 = {131076, "\216\251\000"};
static struct {unsigned f; char r[4];} string2 = {65537, "\001\000\000"};
static struct {unsigned f; char r[16];} string3 = {851984, "\257\300\312\131\110\115\300\370\314\351\125\101\050\000\000"};
static struct {unsigned f; char r[4];} string4 = {65540, "\251\000\000"};
static struct {unsigned f; char r[16];} string5 = {851984, "\257\300\312\131\110\115\300\370\314\351\125\100\310\000\000"};
static struct {unsigned f; char r[4];} string6 = {131074, "\004'\000"};
static struct {unsigned f; char r[16];} string7 = {851984, "\257\300\312\131\110\115\300\370\314\351\125\101\064\000\000"};
static struct {unsigned f; char r[16];} string8 = {917520, "\216\257\300\363\223\326\161\300\017\164\046\072\104\350\000"};
static struct {unsigned f; char r[16];} string9 = {851984, "\257\300\312\131\110\115\300\370\314\351\125\100\324\000\000"};
static struct {unsigned f; char r[4];} string10 = {131074, "\0049\000"};
static struct {unsigned f; char r[56];} string11 = {3407928, "Previous voice editing operation has yet to complete\000\000\000"};
static struct {unsigned f; char r[44];} string12 = {2621484, "Cannot add sound on top of another sound\000\000\000"};
static struct {unsigned f; char r[8];} string13 = {262152, "Text\000\000\000"};
static struct {unsigned f; char r[16];} string14 = {983056, "voiceViewerInfo"};
static struct {unsigned f; char r[8];} string15 = {327688, "voice\000\000"};
static struct {unsigned f; char r[16];} string16 = {851984, "recordingMark\000\000"};
static struct {unsigned f; char r[12];} string17 = {524300, "noLength\000\000\000"};
static struct {unsigned f; char r[4];} string18 = {65540, ">\000\000"};
static struct {unsigned f; char r[4];} string19 = {65540, "v\000\000"};
static struct {unsigned f; char r[44];} string20 = {2687020, "Zero length voice annotation - discarding\000\000"};
static struct {unsigned f; char r[76];} string21 = {4915276, "No character to add voice to; new voice viewer contains voice just recorded"};
static struct {unsigned f; char r[8];} string22 = {458760, "Artwork"};
static struct {unsigned f; char r[12];} string23 = {720908, "TalksBubble"};
static struct {unsigned f; char r[44];} string24 = {2621484, "Make a selection in a Tioga viewer first\000\000\000"};
static struct {unsigned f; char r[48];} string25 = {3080240, "Zero length voice dictation - destroying window"};
static struct {unsigned f; char r[56];} string26 = {3539000, "Zero length voice addition - viewer contents unchanged\000"};
static struct {unsigned f; char r[40];} string27 = {2555944, "Cancel playback before trying to record"};
static struct {unsigned f; char r[20];} string28 = {1114132, "Already recording\000\000"};
static struct {unsigned f; char r[16];} string29 = {786448, "ButtonParams\000\000\000"};
static struct {unsigned f; char r[8];} string30 = {458760, "success"};
static struct {unsigned f; char r[12];} string31 = {589836, "VoiceRope\000\000"};
static struct {unsigned f; char r[44];} string32 = {2621484, "You're already using a dictation viewer.\000\000\000"};
static struct {unsigned f; char r[44];} string33 = {2687020, "Marker set where you were inserting voice\000\000"};
static struct {unsigned f; char r[4];} string34 = {65540, " \000\000"};
static struct {unsigned f; char r[12];} string35 = {720908, "voiceWindow"};
static struct {unsigned f; char r[12];} string36 = {655372, "TiogaVoice\000"};
static struct {unsigned f; char r[16];} string37 = {917520, "Sound Viewer #\000"};
static struct {unsigned f; char r[12];} string38 = {589836, "recording\000\000"};
static struct {unsigned f; char r[12];} string39 = {589836, "scheduled\000\000"};
static struct {unsigned f; char r[8];} string40 = {458760, "started"};
static struct {unsigned f; char r[12];} string41 = {524300, "finished\000\000\000"};
static struct {unsigned f; char r[8];} string42 = {458760, "flushed"};
static struct {unsigned f; char r[12];} string43 = {524300, "playback\000\000\000"};
static struct {unsigned f; char r[8];} string44 = {393224, "paused\000"};
static struct {unsigned f; char r[8];} string45 = {458760, "resumed"};
static struct {unsigned f; char r[16];} string46 = {851984, "\257\300\167\066\353\175\300\133\024\137\361\100\164\000\000"};
static struct {unsigned f; char r[16];} string47 = {851981, "\006\002\040\004\111\034\100\270\010\000\004\043\001\000\000"};
static struct {unsigned f; char r[16];} string48 = {851984, "\257\300\212\174\364\337\300\361\376\000\156\100\150\000\000"};
static struct {unsigned f; char r[16];} string49 = {851984, "\257\300\255\053\300\023\300\142\135\315\105\100\150\000\000"};
static struct {unsigned f; char r[16];} string50 = {851984, "\257\300\212\257\247\124\300\163\005\217\077\100\150\000\000"};
static struct {unsigned f; char r[16];} string51 = {851984, "\257\300\074\270\063\045\300\023\342\016\224\100\150\000\000"};
static struct {unsigned f; char r[16];} string52 = {851984, "\257\300\240\236\274\315\300\111\163\325\023\100\150\000\000"};
static struct {unsigned f; char r[16];} string53 = {851984, "\257\300\363\223\326\161\300\017\164\046\072\100\150\000\000"};
static struct {unsigned f; char r[16];} string54 = {851984, "\257\300\261\010\310\246\300\337\340\027\051\100\150\000\000"};
static struct {unsigned f; char r[16];} string55 = {851984, "\257\300\115\337\006\176\300\345\373\131\011\100\164\000\000"};
static struct {unsigned f; char r[16];} string56 = {851984, "\257\300hqQB\300Vy\362\001@h\000\000"};
static struct {unsigned f; char r[16];} string57 = {851984, "\257\300\136\253\306\024\300\100\114\357\174\100\150\000\000"};
static struct {unsigned f; char r[16];} string58 = {1416195943, "aVoicePrivate"};
static struct {unsigned f; char r[16];} string59 = {851984, "\257\300\312\131\110\115\300\370\314\351\125\100\150\000\000"};
static struct {unsigned f; char r[16];} string60 = {851984, "\257\300\354\332\367\333\300\361\203\205\173\100\150\000\000"};
static struct {unsigned f; char r[16];} string61 = {851984, "\257\300\244\340\135\243\300\261\211\021\257\100\150\000\000"};
static struct {
word f0[81]; word f81; word f82; word f83;
word f84; word f85; word f86; word f87;
word f88; word f89; word f90; word f91;
word f92; word f93; word f94; word f95;
word f96; word f97; word f98; word f99;
word f100; word f101; word f102; word f103;
word f104; word f105; word f106; word f107;
word f108; word f109; word f110; word f111;
word f112; word f113; word f114; word f115;
word f116; word f117; word f118[15];
} globalframe = {
{0}, (word) RequestReport←P1080, 0, (word) ConversationReport←P1020,
0, (word) ForkStopRecording←P960, 0, (word) RecordInPlaceOfSelection←P900,
0, (word) ChangeVoiceInputFocus←P840, 0, (word) DictationMachine←P780,
0, (word) NewDictationWindow←P720, 0, (word) StopRecording←P660,
0, (word) NewRecordingMarker←P600, 0, (word) IncrementRecordTimer←P540,
0, (word) RecordingTimer←P480, 0, (word) RecordNewRope←P420,
0, (word) StartRecording←P360, 0, (word) BlinkMessageWindow←P300,
0, (word) PrepareSelection←P240, 0, (word) AddVoiceProc←P180,
0, (word) CancelProc←P120, 0, (word) RecordingInProgress←P60,
0, (word) VoiceRecordImpl←P0, {0}
};
static void NoName←Q1920()
{
register ptr gf←c0179 = (ptr) &globalframe;
word var←c27216;
(* (( (ptr) gf←c0179)+34) ) = (word) XR←GetTypeIndex((word) &string1, 0, (word) &string2);
(* (( (ptr) gf←c0179)+35) ) = (word) XR←GetTypeIndex((word) &string3, 0, (word) &string2);
(* (( (ptr) gf←c0179)+36) ) = (word) XR←GetTypeIndexS((word) (&string4));
(* (( (ptr) gf←c0179)+37) ) = (word) XR←GetTypeIndex((word) &string5, 0, (word) &string6);
(* (( (ptr) gf←c0179)+40) ) = (word) XR←GetTypeIndexS((word) (&string7));
(* (( (ptr) gf←c0179)+42) ) = (word) XR←GetTypeIndex((word) &string8, 0, (word) &string2);
(* (( (ptr) gf←c0179)+44) ) = (word) XR←GetTypeIndex((word) &string9, 0, (word) &string10);
(* (ptr) (( (bPt) gf←c0179)+184) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0179)+42) ), (word) &string11);
(* (ptr) (( (bPt) gf←c0179)+188) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0179)+42) ), (word) &string12);
(* (ptr) (( (bPt) gf←c0179)+192) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0179)+34) ), (word) &string13);
(* (ptr) (( (bPt) gf←c0179)+196) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0179)+34) ), (word) &string14);
(* (ptr) (( (bPt) gf←c0179)+200) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0179)+34) ), (word) &string15);
(* (ptr) (( (bPt) gf←c0179)+204) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0179)+34) ), (word) &string16);
(* (ptr) (( (bPt) gf←c0179)+208) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0179)+34) ), (word) &string17);
(* (ptr) (( (bPt) gf←c0179)+212) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0179)+42) ), (word) &string18);
(* (ptr) (( (bPt) gf←c0179)+216) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0179)+42) ), (word) &string19);
(* (ptr) (( (bPt) gf←c0179)+220) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0179)+42) ), (word) &string20);
(* (ptr) (( (bPt) gf←c0179)+224) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0179)+42) ), (word) &string21);
(* (ptr) (( (bPt) gf←c0179)+228) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0179)+34) ), (word) &string22);
(* (ptr) (( (bPt) gf←c0179)+232) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0179)+42) ), (word) &string23);
(* (ptr) (( (bPt) gf←c0179)+236) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0179)+42) ), (word) &string24);
(* (ptr) (( (bPt) gf←c0179)+240) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0179)+42) ), (word) &string25);
(* (ptr) (( (bPt) gf←c0179)+244) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0179)+42) ), (word) &string26);
(* (ptr) (( (bPt) gf←c0179)+248) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0179)+42) ), (word) &string27);
(* (ptr) (( (bPt) gf←c0179)+252) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0179)+42) ), (word) &string28);
(* (ptr) (( (bPt) gf←c0179)+256) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0179)+34) ), (word) &string29);
(* (ptr) (( (bPt) gf←c0179)+260) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0179)+34) ), (word) &string30);
(* (ptr) (( (bPt) gf←c0179)+264) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0179)+34) ), (word) &string31);
(* (ptr) (( (bPt) gf←c0179)+268) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0179)+42) ), (word) &string32);
(* (ptr) (( (bPt) gf←c0179)+272) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0179)+42) ), (word) &string33);
(* (ptr) (( (bPt) gf←c0179)+276) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0179)+42) ), (word) &string34);
(* (ptr) (( (bPt) gf←c0179)+280) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0179)+34) ), (word) &string35);
(* (ptr) (( (bPt) gf←c0179)+284) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0179)+34) ), (word) &string36);
(* (ptr) (( (bPt) gf←c0179)+288) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0179)+42) ), (word) &string37);
(* (ptr) (( (bPt) gf←c0179)+292) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0179)+34) ), (word) &string38);
(* (ptr) (( (bPt) gf←c0179)+296) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0179)+34) ), (word) &string39);
(* (ptr) (( (bPt) gf←c0179)+300) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0179)+34) ), (word) &string40);
(* (ptr) (( (bPt) gf←c0179)+304) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0179)+34) ), (word) &string41);
(* (ptr) (( (bPt) gf←c0179)+308) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0179)+34) ), (word) &string42);
(* (ptr) (( (bPt) gf←c0179)+312) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0179)+34) ), (word) &string43);
(* (ptr) (( (bPt) gf←c0179)+316) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0179)+34) ), (word) &string44);
(* (ptr) (( (bPt) gf←c0179)+320) ) = (word) XR←GetRefLiteral((* (( (ptr) gf←c0179)+34) ), (word) &string45);
(void) XR←DeclareGlobalFrame((word) "VoiceRecordImpl", &globalframe, (word) XR←GetTypeIndex((word) &string46, 0, (word) &string47)
, (word) (( (bPt) gf←c0179)+468)/* var←c25520 */ );
var←c27216 = (word) XR←ImportInterface((word) "BasicTime", (word) XR←GetTypeIndexS((word) (&string48)), 24);
(* (( (ptr) gf←c0179)+128)/* var←c26096 */ ) = var←c27216;
(void) XR←ImportProcS(var←c27216, 67372033);
(void) XR←ImportProcS(var←c27216, 67109632);
(void) XR←ImportProcS(var←c27216, 67372545);
var←c27216 = (word) XR←ImportInterface((word) "Convert", (word) XR←GetTypeIndexS((word) (&string49)), 73);
(* (( (ptr) gf←c0179)+131)/* var←c26960 */ ) = var←c27216;
(void) XR←ImportProcS(var←c27216, 67901187);
var←c27216 = (word) XR←ImportInterface((word) "FinchSmarts", (word) XR←GetTypeIndexS((word) (&string50)), 27);
(* (( (ptr) gf←c0179)+119)/* var←c25552 */ ) = var←c27216;
(void) XR←ImportProcS(var←c27216, 1579014);
var←c27216 = (word) XR←ImportInterface((word) "MessageWindow", (word) XR←GetTypeIndexS((word) (&string51)), 7);
(* (( (ptr) gf←c0179)+126)/* var←c25904 */ ) = var←c27216;
(void) XR←ImportProcS(var←c27216, 512);
(void) XR←ImportProcS(var←c27216, 524546);
var←c27216 = (word) XR←ImportInterface((word) "Process", (word) XR←GetTypeIndexS((word) (&string52)), 22);
(* (( (ptr) gf←c0179)+127)/* var←c25968 */ ) = var←c27216;
(void) XR←ImportProcS(var←c27216, 67371521);
(void) XR←ImportProcS(var←c27216, 266497);
(void) XR←ImportProcS(var←c27216, 264449);
(void) XR←ImportProcS(var←c27216, 526081);
var←c27216 = (word) XR←ImportInterface((word) "Rope", (word) XR←GetTypeIndexS((word) (&string53)), 43);
(* (( (ptr) gf←c0179)+130)/* var←c26800 */ ) = var←c27216;
(void) XR←ImportProcS(var←c27216, 67633666);
var←c27216 = (word) XR←ImportInterface((word) "TextEdit", (word) XR←GetTypeIndexS((word) (&string54)), 39);
(* (( (ptr) gf←c0179)+124)/* var←c25808 */ ) = var←c27216;
(void) XR←ImportProcS(var←c27216, 1838343);
(void) XR←ImportProcS(var←c27216, 136585481);
(void) XR←ImportProcS(var←c27216, 67898371);
(void) XR←ImportProcS(var←c27216, 67371521);
var←c27216 = (word) XR←ImportInterface((word) "TextLooks", (word) XR←GetTypeIndexS((word) (&string55)), 8);
(* (( (ptr) gf←c0179)+129)/* var←c26320 */ ) = var←c27216;
(void) XR←ImportProcS(var←c27216, 67372801);
var←c27216 = (word) XR←ImportInterface((word) "TiogaExtraOps", (word) XR←GetTypeIndexS((word) (&string56)), 18);
(* (( (ptr) gf←c0179)+125)/* var←c25840 */ ) = var←c27216;
(void) XR←ImportProcS(var←c27216, 527362);
(void) XR←ImportProcS(var←c27216, 134744578);
(void) XR←ImportProcS(var←c27216, 788739);
var←c27216 = (word) XR←ImportInterface((word) "TiogaOps", (word) XR←GetTypeIndexS((word) (&string57)), 128);
(* (( (ptr) gf←c0179)+123)/* var←c25744 */ ) = var←c27216;
(void) XR←ImportProcS(var←c27216, 67391233);
(void) XR←ImportProcS(var←c27216, 67393281);
(void) XR←ImportProcS(var←c27216, 67393793);
(void) XR←ImportProcS(var←c27216, 2374919);
(void) XR←ImportProcS(var←c27216, 537148161);
(void) XR←ImportProcS(var←c27216, 553474);
var←c27216 = (word) XR←ImportInterface((word) &string58, (word) XR←GetTypeIndexS((word) (&string59)), 84);
(* (( (ptr) gf←c0179)+120)/* var←c25584 */ ) = var←c27216;
(void) XR←ImportProcS(var←c27216, 531458);
(void) XR←ImportProcS(var←c27216, 1051139);
(void) XR←ImportProcS(var←c27216, 539394);
(void) XR←ImportProcS(var←c27216, 67642626);
(void) XR←ImportProcS(var←c27216, 265473);
(void) XR←ImportProcS(var←c27216, 69213704);
(void) XR←ImportProcS(var←c27216, 134752258);
(void) XR←ImportProcS(var←c27216, 1312517);
(void) XR←ImportProcS(var←c27216, 202114563);
(void) XR←ImportProcS(var←c27216, 265217);
(void) XR←ImportProcS(var←c27216, 202386436);
(void) XR←ImportProcS(var←c27216, 202386180);
(void) XR←ImportProcS(var←c27216, 544769);
(void) XR←ImportProcS(var←c27216, 281857);
(void) XR←ImportProcS(var←c27216, 67115264);
(void) XR←ImportProcS(var←c27216, 6656);
var←c27216 = (word) XR←ImportInterface((word) "ViewerOps", (word) XR←GetTypeIndexS((word) (&string60)), 43);
(* (( (ptr) gf←c0179)+122)/* var←c25648 */ ) = var←c27216;
(void) XR←ImportProcS(var←c27216, 527106);
(void) XR←ImportProcS(var←c27216, 67639554);
var←c27216 = (word) XR←ImportInterface((word) "VoiceRope", (word) XR←GetTypeIndexS((word) (&string61)), 20);
(* (( (ptr) gf←c0179)+121)/* var←c25616 */ ) = var←c27216;
(void) XR←ImportProcS(var←c27216, 67635970);
(void) XR←ImportProcS(var←c27216, 67900163);
(void) XR←ImportProcS(var←c27216, 202638853);
(void) XR←ImportProcS(var←c27216, 67110144);
(void) XR←ImportProcS(var←c27216, 67635202);
var←c27216 = (word) XR←ExportInterface((word) &string58, (word) XR←GetTypeIndexS((word) (&string59)), 84);
(* (( (ptr) gf←c0179)+132)/* var←c27248 */ ) = var←c27216;
(void) XR←ExportProcS(var←c27216, (word) (( (bPt) gf←c0179)+444)/* var←c25424 */ , 134487809);
(void) XR←ExportProcS(var←c27216, (word) (( (bPt) gf←c0179)+452)/* var←c25456 */ , 134488065);
(void) XR←ExportProcS(var←c27216, (word) (( (bPt) gf←c0179)+364)/* var←c25104 */ , 134488321);
(void) XR←ExportProcS(var←c27216, (word) (( (bPt) gf←c0179)+460)/* var←c25488 */ , 67117568);
(void) XR←ExportProcS(var←c27216, (word) (( (bPt) gf←c0179)+380)/* var←c25168 */ , 8960);
(void) XR←ExportProcS(var←c27216, (word) (( (bPt) gf←c0179)+348)/* var←c25040 */ , 271361);
}
static void VoiceRecordImpl←P0(formal←c047, formal←c046)
word formal←c047;
word formal←c046;
{
register ptr gf←c27280 = (ptr) &globalframe;
/* VoiceRecordImpl: */
SOURCE(1498, 16113)
SOURCE(17488, 123)
{
word pd62;
pd62 = (* (( (ptr) (* (( (ptr) gf←c27280)+119)/* var←c25552 */ ))+28) );
(void) ( *( (fPt) ((* (ptr) pd62 ))))((* (( (ptr) gf←c27280)+71) ), 0, (word) (( (bPt) gf←c27280)+332)/* var←c24976 */ , (word) (
( (bPt) gf←c27280)+324)/* var←c24944 */ , (* (( (ptr) gf←c27280)+66) ), 0, pd62);
};
}
static word RecordingInProgress←P60()
{
register ptr gf←c27312 = (ptr) &globalframe;
word var←c4316;
/* RecordingInProgress: */
SOURCE(2206, 100)
SOURCE(2262, 44)
return((* (( (ptr) gf←c27312)+8) ));
}
static void CancelProc←P120(formal←c052, viewer←v19688)
word formal←c052;
word viewer←v19688;
{
register ptr gf←c27344 = (ptr) &globalframe;
word recordAtom←v19732;
word quit←v19760;
/* CancelProc: */
SOURCE(2309, 7165)
SOURCE(2309, 7165)
recordAtom←v19732 = 1;
SOURCE(2309, 7165)
quit←v19760 = 0;
SOURCE(2354, 7120)
{
word pd63;
pd63 = (* (( (ptr) (* (( (ptr) gf←c27344)+121)/* var←c25616 */ ))+12) );
if (((word) ( *( (fPt) ((* (ptr) pd63 ))))((* (ptr) (* (( (ptr) (* (( (ptr) gf←c27344)+120)/* var←c25584 */ ))+6) ) ), 0, pd63)
!= (* (( (ptr) gf←c27344)+65) ))) {
SOURCE(2424, 15)
(void) StopRecording←P660();
SOURCE(2441, 34)
{
word pd64;
pd64 = (* (( (ptr) (* (( (ptr) gf←c27344)+120)/* var←c25584 */ ))+30) );
(void) ( *( (fPt) ((* (ptr) pd64 ))))(pd64);
};
};
};
/* removed tail goto */
(* (ptr) formal←c052 ) = recordAtom←v19732;
(* (( (ptr) formal←c052)+1) ) = quit←v19760;
return;
}
static void AddVoiceProc←P180(formal←c058, viewer←v19820)
word formal←c058;
word viewer←v19820;
{
register ptr gf←c27376 = (ptr) &globalframe;
word recordAtom←v19864;
word quit←v19892;
word buttonParams←v4872;
word mouseButton←v4900;
/* AddVoiceProc: */
SOURCE(2484, 6990)
(void) (XR←MonitorEntry((word) (( (bPt) gf←c27376)+16)/* LOCK←v3196 */ ));
SOURCE(2484, 6990)
recordAtom←v19864 = 1;
SOURCE(2484, 6990)
quit←v19892 = 0;
SOURCE(2536, 97)
{
word pd65;
pd65 = (* (( (ptr) (* (( (ptr) gf←c27376)+122)/* var←c25648 */ ))+29) );
buttonParams←v4872 = XR←Narrow((word) ( *( (fPt) ((* (ptr) pd65 ))))(viewer←v19820, (* (( (ptr) gf←c27376)+64) ), pd65), (* (
( (ptr) gf←c27376)+40) ));
};
SOURCE(2635, 100)
mouseButton←v4900 = ( (buttonParams←v4872 != 0) ? (* (ptr) buttonParams←v4872 ) : 0 ) ;
SOURCE(2737, 92)
if ((0 != (* (( (ptr) gf←c27376)+8) ))) {
SOURCE(2782, 39)
(void) BlinkMessageWindow←P300((* ((( (ptr) gf←c27376)+63)) ));
SOURCE(2823, 6)
goto lab←L100002;
};
SOURCE(2835, 6639)
{
word pd66;
pd66 = (* (( (ptr) (* (( (ptr) gf←c27376)+120)/* var←c25584 */ ))+29) );
if ((0 != (word) ( *( (fPt) ((* (ptr) pd66 ))))(pd66))) {
SOURCE(2884, 61)
(void) BlinkMessageWindow←P300((* ((( (ptr) gf←c27376)+62)) ));
SOURCE(2947, 6)
goto lab←L100002;
};
};
SOURCE(3050, 34)
{
word pd67;
pd67 = (* (( (ptr) (* (( (ptr) gf←c27376)+120)/* var←c25584 */ ))+30) );
(void) ( *( (fPt) ((* (ptr) pd67 ))))(pd67);
};
SOURCE(3087, 6387)
if ((0 == (word) PrepareSelection←P240())) {
SOURCE(3115, 6)
goto lab←L100002;
};
SOURCE(3124, 34)
(void) StartRecording←P360((mouseButton←v4900 == 0));
/* removed tail goto */
lab←L100002: ;
(void) (XR←MonitorExit((word) (( (bPt) gf←c27376)+16)/* LOCK←v3196 */ ));
(* (ptr) formal←c058 ) = recordAtom←v19864;
(* (( (ptr) formal←c058)+1) ) = quit←v19892;
return;
}
static word PrepareSelection←P240()
{
W17 var←c27408;
register ptr gf←c27440 = (ptr) &globalframe;
word succeeded←v4376;
/* declaration of var←c25680 skipped */
/* declaration of targetViewer←v4944 skipped */
/* declaration of targetStart←v4972 skipped */
/* declaration of targetEnd←v5000 skipped */
/* declaration of targetCaretBefore←v5028 skipped */
/* declaration of targetPendingDelete←v5056 skipped */
/* declaration of alreadyBeingEdited←v5084 skipped */
/* declaration of alreadyVoiceThere←v5112 skipped */
/* declaration of suitableViewer←v5140 skipped */
/* PrepareSelection: */
SOURCE(3163, 6311)
{
word tmpAddr68;
tmpAddr68 = (word) (( (ptr) &var←c27408)+4)/* var←c25680 */ ;
(* (ptr) tmpAddr68 ) = ( ((word) (fPt) DoIt←P1140) );
(* (( (ptr) tmpAddr68) + 1) ) = 1;
};
SOURCE(3163, 6311)
succeeded←v4376 = 0;
SOURCE(3236, 34)
(* (( (ptr) &var←c27408)+6)/* targetViewer←v4944 */ ) = 0;
SOURCE(3272, 45)
(* (( (ptr) &var←c27408)+7) ) = 0;
(* (( (ptr) &var←c27408)+8) ) = 0;
(* (W2Pt) (( (ptr) &var←c27408)+9)/* targetEnd←v5000 */ ) = (* (W2Pt) (( (ptr) &var←c27408)+7)/* targetStart←v4972 */ );
SOURCE(3369, 35)
(* (( (ptr) &var←c27408)+13)/* alreadyBeingEdited←v5084 */ ) = 0;
SOURCE(3406, 34)
(* (( (ptr) &var←c27408)+14)/* alreadyVoiceThere←v5112 */ ) = 0;
SOURCE(5497, 77)
SOURCE(5497, 77)
{
/* declaration of var←c01 skipped */
(* (( (ptr) &var←c27408)+16)/* var←c01 */ ) = (* (( (ptr) (* (( (ptr) gf←c27440)+123)/* var←c25744 */ ))+118) );
{
word var←c02;
{
word var←c0214;
var←c0214 = (word) &var←c27408;
var←c02 = (word) XR←Enable(( ((word) (fPt) NoName←Q1980) ), ( ((word) (fPt) NoName←Q2160) ), var←c0214);
};
/* removed trivial cond node */
};
};
if ((0 == (* (( (ptr) &var←c27408)+15)/* suitableViewer←v5140 */ ))) {
SOURCE(5627, 62)
(void) BlinkMessageWindow←P300((* ((( (ptr) gf←c27440)+59)) ));
}
else {
if ((0 != (* (( (ptr) &var←c27408)+13)/* alreadyBeingEdited←v5084 */ ))) {
SOURCE(5713, 74)
(void) BlinkMessageWindow←P300((* ((( (ptr) gf←c27440)+46)) ));
}
else {
if ((0 != (* (( (ptr) &var←c27408)+14)/* alreadyVoiceThere←v5112 */ ))) {
SOURCE(5810, 62)
(void) BlinkMessageWindow←P300((* ((( (ptr) gf←c27440)+47)) ));
}
else {
SOURCE(5885, 16)
succeeded←v4376 = 1;
};
};
};
SOURCE(3163, 6311)
return(succeeded←v4376);
}
static word NoName←Q1980(formal←c0185)
word formal←c0185;
{
SOURCE(5497, 77)
{
word pd69;
pd69 = (* (( (ptr) formal←c0185)+16) );
(void) ( *( (fPt) ((* (ptr) pd69 ))))((word) (( (bPt) formal←c0185)+16), 0, pd69);
};
return(0);
}
static void DoIt←P1140(root←v5244, formal←c27504)
word root←v5244;
word formal←c27504;
{
register ptr gf←c27472 = (ptr) &globalframe;
word level←v5272 = 1;
formal←c27504 = (formal←c27504 - 16);
/* DoIt: */
SOURCE(3468, 6006)
SOURCE(3550, 5924)
{
W8 var←c25776;
{
word pd70;
pd70 = (* (( (ptr) (* (( (ptr) gf←c27472)+123)/* var←c25744 */ ))+63) );
(void) ( *( (fPt) ((* (ptr) pd70 ))))((word) &var←c25776, 0, pd70);
};
(* (( (ptr) formal←c27504)+12) ) = var←c25776.f7;
(* (( (ptr) formal←c27504)+11) ) = var←c25776.f6;
level←v5272 = var←c25776.f5;
(* (W2Pt) (( (ptr) formal←c27504)+9) ) = (* (W2Pt) (( (ptr) &var←c25776)+3) );
(* (W2Pt) (( (ptr) formal←c27504)+7) ) = (* (W2Pt) (( (ptr) &var←c25776)+1) );
(* (( (ptr) formal←c27504)+6) ) = var←c25776.f0;
};
SOURCE(3718, 50)
(* (( (ptr) formal←c27504)+15) ) = ((* (ptr) (* (ptr) (* (( (ptr) formal←c27504)+6) ) ) ) == (* (( (ptr) gf←c27472)+48)
));
SOURCE(3771, 5703)
if ((0 != (* (( (ptr) formal←c27504)+15) ))) {
SOURCE(3796, 5678)
{
word pd71;
pd71 = (* (( (ptr) (* (( (ptr) gf←c27472)+122)/* var←c25648 */ ))+29) );
(* (( (ptr) gf←c27472)+9) ) = ((word) ( *( (fPt) ((* (ptr) pd71 ))))((* (( (ptr) formal←c27504)+6) ), (* (( (ptr) gf←c27472)+49)
), pd71) == 0);
};
SOURCE(3893, 5581)
if ((0 != (* (( (ptr) gf←c27472)+9) ))) {
SOURCE(3937, 823)
{
W2 targetChar←v5316;
word node←v5344;
SOURCE(3939, 88)
{
word tcp72;
if ((0 != (* (( (ptr) formal←c27504)+11) ))) {
tcp72 = (word) (( (ptr) formal←c27504)+7);
}
else {
tcp72 = (word) (( (ptr) formal←c27504)+9);
};
targetChar←v5316 = (* (W2Pt) tcp72 );
};
SOURCE(4029, 36)
node←v5344 = targetChar←v5316.f0;
SOURCE(4092, 306)
if ((0 != (* (( (ptr) formal←c27504)+12) ))) {
SOURCE(4122, 75)
{
word pd73;
pd73 = (* (( (ptr) (* (( (ptr) gf←c27472)+120)/* var←c25584 */ ))+81) );
(void) ( *( (fPt) ((* (ptr) pd73 ))))((* ((( (ptr) (* (( (ptr) gf←c27472)+120)/* var←c25584 */ ))+84)) ), pd73);
};
SOURCE(4199, 199)
{
word pd74;
pd74 = (* (( (ptr) (* (( (ptr) gf←c27472)+123)/* var←c25744 */ ))+65) );
(void) ( *( (fPt) ((* (ptr) pd74 ))))((* (( (ptr) formal←c27504)+6) ), (* (W2Pt) (( (ptr) formal←c27504)+7) ), (* (W2Pt) (
( (ptr) formal←c27504)+9) ), level←v5272, (* (( (ptr) formal←c27504)+11) ), 0
, 0, pd74);
};
};
SOURCE(4401, 5073)
{
word pd75;
pd75 = (* (( (ptr) (* (( (ptr) gf←c27472)+124)/* var←c25808 */ ))+6) );
if (( (int)(word) ( *( (fPt) ((* (ptr) pd75 ))))(node←v5344, pd75) <= (int)targetChar←v5316.f1)) {
SOURCE(4449, 45)
{
word x76;
targetChar←v5316.f1 = (x76 = (targetChar←v5316.f1 - 1),
MAX((int)(word), x76, 0));
};
};
};
SOURCE(4496, 4978)
{
word pd77;
pd77 = (* (( (ptr) (* (( (ptr) gf←c27472)+124)/* var←c25808 */ ))+16) );
(* (( (ptr) formal←c27504)+14) ) = ((word) ( *( (fPt) ((* (ptr) pd77 ))))(node←v5344, targetChar←v5316.f1, (* (( (ptr) gf←c27472)+50)
), pd77) != 0);
};
SOURCE(4576, 37)
(* (( (ptr) gf←c27472)+10) ) = targetChar←v5316.f0;
SOURCE(4615, 40)
(* (( (ptr) gf←c27472)+11) ) = (* (( (ptr) formal←c27504)+6) );
SOURCE(4657, 103)
if ((0 == (* (( (ptr) formal←c27504)+14) ))) {
SOURCE(4684, 76)
{
word pd78;
pd78 = (* (( (ptr) (* (( (ptr) gf←c27472)+125)/* var←c25840 */ ))+13) );
(void) ( *( (fPt) ((* (ptr) pd78 ))))(targetChar←v5316.f0, targetChar←v5316.f1, (* (( (ptr) gf←c27472)+51) ), pd78);
};
};
};
}
else {
{
W3 var←c077;
word var←c0215;
SOURCE(4769, 4705)
{
W3 var←c25872;
{
word pd79;
pd79 = (* (( (ptr) (* (( (ptr) gf←c27472)+120)/* var←c25584 */ ))+47) );
(void) ( *( (fPt) ((* (ptr) pd79 ))))((word) &var←c25872, 0, 0, 0, 0, pd79);
};
(* (( (ptr) gf←c27472)+12) ) = var←c25872.f1;
(* (( (ptr) formal←c27504)+13) ) = var←c25872.f0;
};
SOURCE(4944, 33)
if ((0 != (* (( (ptr) formal←c27504)+13) ))) {
SOURCE(4971, 6)
return;
};
SOURCE(4979, 4495)
{
word tc80;
if (( (int)(* (( (ptr) (* (( (ptr) gf←c27472)+12) ))+4) ) != (int)0)) {
{
word pd81;
pd81 = (* (( (ptr) (* (( (ptr) gf←c27472)+120)/* var←c25584 */ ))+48) );
(void) ( *( (fPt) ((* (ptr) pd81 ))))((word) &var←c077, (* (( (ptr) gf←c27472)+12) ), 0, 0, 1, pd81);
};
var←c0215 = var←c077.f0;
tc80 = (word) (0 != var←c0215);
}
else {
tc80 = (word) 0;
};
if (tc80) {
SOURCE(5178, 20)
(void) NewDictationWindow←P720();
};
};
SOURCE(5350, 123)
(* (( (ptr) gf←c27472)+13) ) = IOP2( / , (int)(* (( (ptr) (* (( (ptr) gf←c27472)+12) ))+3) ), (int)2000);
};
};
};
}
static void BlinkMessageWindow←P300(r←v4436)
word r←v4436;
{
register ptr gf←c27536 = (ptr) &globalframe;
/* BlinkMessageWindow: */
SOURCE(5935, 96)
SOURCE(5979, 29)
{
word pd82;
pd82 = (* (( (ptr) (* (( (ptr) gf←c27536)+126)/* var←c25904 */ ))+5) );
(void) ( *( (fPt) ((* (ptr) pd82 ))))(r←v4436, 1, pd82);
};
SOURCE(6010, 21)
{
word pd83;
pd83 = (* (( (ptr) (* (( (ptr) gf←c27536)+126)/* var←c25904 */ ))+6) );
(void) ( *( (fPt) ((* (ptr) pd83 ))))(pd83);
};
}
static void StartRecording←P360(selfElseOther←v4496)
word selfElseOther←v4496;
{
register ptr gf←c27568 = (ptr) &globalframe;
/* StartRecording: */
SOURCE(6037, 3437)
SOURCE(6097, 41)
(* (( (ptr) gf←c27568)+8) ) = 1;
SOURCE(6140, 31)
(* (( (ptr) gf←c27568)+18) ) = 0;
SOURCE(6173, 28)
(* (( (ptr) gf←c27568)+19) ) = 0;
SOURCE(6203, 35)
(* (( (ptr) gf←c27568)+14) ) = 0;
SOURCE(6240, 3234)
{
word pd84;
pd84 = (* (( (ptr) (* (( (ptr) gf←c27568)+121)/* var←c25616 */ ))+9) );
(* (( (ptr) gf←c27568)+15) ) = (word) ( *( (fPt) ((* (ptr) pd84 ))))(pd84);
};
SOURCE(6293, 28)
(* (( (ptr) gf←c27568)+16) ) = (* (( (ptr) gf←c27568)+65) );
SOURCE(6331, 3143)
SOURCE(6332, 3142)
{
W2 var←c25936;
{
W2 var←c082;
word var←c081;
var←c081 = XR←ExtensionAlloc(5);
{
word tmpAddr85;
tmpAddr85 = (word) var←c081;
(* (ptr) tmpAddr85 ) = ( ((word) (fPt) NoName←Q2220) );
(* (( (ptr) tmpAddr85) + 1) ) = 0;
(* (( (ptr) tmpAddr85) + 2) ) = (word) (( (bPt) gf←c27568)+412)/* var←c25296 */ ;
(* (( (ptr) tmpAddr85) + 3) ) = 0;
(* (( (ptr) tmpAddr85) + 4) ) = selfElseOther←v4496;
};
(void) XR←Fork((word) &var←c082, var←c081);
var←c25936 = var←c082;
};
{
word pd86;
pd86 = (* (( (ptr) (* (( (ptr) gf←c27568)+127)/* var←c25968 */ ))+11) );
(void) ( *( (fPt) ((* (ptr) pd86 ))))(var←c25936, pd86);
};
};
}
static void RecordNewRope←P420(selfElseOther←v4556)
word selfElseOther←v4556;
{
W6 var←c27600;
register ptr gf←c27632 = (ptr) &globalframe;
/* declaration of var←c26000 skipped */
/* RecordNewRope: */
SOURCE(6388, 3086)
{
word tmpAddr87;
tmpAddr87 = (word) (( (ptr) &var←c27600)+4)/* var←c26000 */ ;
(* (ptr) tmpAddr87 ) = ( ((word) (fPt) BroadcastRecordingDone←P1248) );
(* (( (ptr) tmpAddr87) + 1) ) = 1;
};
SOURCE(6530, 2944)
{
W3 var←c26032;
{
word pd88;
pd88 = (* (( (ptr) (* (( (ptr) gf←c27632)+121)/* var←c25616 */ ))+10) );
(void) ( *( (fPt) ((* (ptr) pd88 ))))((word) &var←c26032, (* (ptr) (* (( (ptr) (* (( (ptr) gf←c27632)+120)/* var←c25584 */ ))+6)
) ), (* (( (ptr) gf←c27632)+15) ), 0, (* (( (ptr) gf←c27632)+71) ), selfElseOther←v4556, pd88);
};
(* (( (ptr) gf←c27632)+19) ) = var←c26032.f1;
(* (( (ptr) gf←c27632)+16) ) = var←c26032.f0;
};
SOURCE(6743, 105)
{
word var←c26064;
var←c26064 = (* (( (ptr) gf←c27632)+16) );
if ((var←c26064 == (* (( (ptr) gf←c27632)+65) )) || (var←c26064 == (* (( (ptr) gf←c27632)+52) ))) {
SOURCE(6796, 24)
(void) BroadcastRecordingDone←P1248((word) ((( (bPt) &var←c27600)+16)/* var←c26000 */ ));
}
else {
SOURCE(6833, 15)
(void) StopRecording←P660();
};
};
}
static void BroadcastRecordingDone←P1248(formal←c27696)
word formal←c27696;
{
register ptr gf←c27664 = (ptr) &globalframe;
formal←c27696 = (formal←c27696 - 16);
/* BroadcastRecordingDone: */
SOURCE(6434, 63)
(void) (XR←MonitorEntry((word) (( (bPt) gf←c27664)+16)/* LOCK←v3196 */ ));
SOURCE(6473, 24)
(void) (XR←Broadcast((word) (( (bPt) gf←c27664)+104)/* recordingDone←v3280 */ ));
SOURCE(6434, 63)
(void) (XR←MonitorExit((word) (( (bPt) gf←c27664)+16)/* LOCK←v3196 */ ));
return;
}
static void RecordingTimer←P480()
{
register ptr gf←c27728 = (ptr) &globalframe;
word aVeryLongTime←v5448;
/* RecordingTimer: */
SOURCE(6854, 2620)
SOURCE(6880, 75)
{
word pd89;
pd89 = (* (( (ptr) (* (( (ptr) gf←c27728)+128)/* var←c26096 */ ))+10) );
aVeryLongTime←v5448 = (word) ( *( (fPt) ((* (ptr) pd89 ))))(300000000, pd89);
};
SOURCE(7015, 32)
{
word pd90;
pd90 = (* (( (ptr) (* (( (ptr) gf←c27728)+127)/* var←c25968 */ ))+13) );
(void) ( *( (fPt) ((* (ptr) pd90 ))))(6, pd90);
};
SOURCE(7050, 2424)
{
word pd91;
pd91 = (* (( (ptr) (* (( (ptr) gf←c27728)+128)/* var←c26096 */ ))+7) );
(* (( (ptr) gf←c27728)+17) ) = (word) ( *( (fPt) ((* (ptr) pd91 ))))(pd91);
};
SOURCE(7106, 30)
(* (( (ptr) gf←c27728)+18) ) = 2;
SOURCE(7139, 2335)
lab←L100009: ;
SOURCE(7139, 2335)
{
word now←v5520;
SOURCE(7142, 50)
{
word pd92;
pd92 = (* (( (ptr) (* (( (ptr) gf←c27728)+128)/* var←c26096 */ ))+7) );
now←v5520 = (word) ( *( (fPt) ((* (ptr) pd92 ))))(pd92);
};
SOURCE(7194, 2280)
if ((((* (( (ptr) gf←c27728)+17) ) - now←v5520) < aVeryLongTime←v5448)) {
SOURCE(7294, 2180)
{
word var←c26128;
{
word var←c26160;
{
word pd93;
pd93 = (* (( (ptr) (* (( (ptr) gf←c27728)+128)/* var←c26096 */ ))+8) );
var←c26160 = ((word) ( *( (fPt) ((* (ptr) pd93 ))))(((* (( (ptr) gf←c27728)+17) ) - now←v5520), pd93) / 1000);
};
{
word pd94;
pd94 = (* (( (ptr) (* (( (ptr) gf←c27728)+127)/* var←c25968 */ ))+6) );
var←c26128 = (word) ( *( (fPt) ((* (ptr) pd94 ))))(var←c26160, pd94);
};
};
{
word pd95;
pd95 = (* (( (ptr) (* (( (ptr) gf←c27728)+127)/* var←c25968 */ ))+21) );
(void) ( *( (fPt) ((* (ptr) pd95 ))))(var←c26128, pd95);
};
};
};
SOURCE(7399, 2075)
if ((0 == (word) IncrementRecordTimer←P540())) {
SOURCE(7432, 6)
return;
};
};
goto lab←L100009;
}
static word IncrementRecordTimer←P540()
{
register ptr gf←c27760 = (ptr) &globalframe;
word stillRunning←v4632;
/* IncrementRecordTimer: */
SOURCE(7453, 2021)
(void) (XR←MonitorEntry((word) (( (bPt) gf←c27760)+16)/* LOCK←v3196 */ ));
SOURCE(7453, 2021)
stillRunning←v4632 = 1;
SOURCE(7529, 111)
if (((* (( (ptr) gf←c27760)+18) ) != 2)) {
SOURCE(7572, 31)
(* (( (ptr) gf←c27760)+18) ) = 0;
SOURCE(7605, 18)
(void) (XR←Broadcast((word) (( (bPt) gf←c27760)+80)/* timerOff←v3252 */ ));
SOURCE(7625, 15)
(void) (XR←MonitorExit((word) (( (bPt) gf←c27760)+16)/* LOCK←v3196 */ ));
return(0);
};
SOURCE(7644, 1830)
{
word pd96;
pd96 = (* (( (ptr) (* (( (ptr) gf←c27760)+128)/* var←c26096 */ ))+10) );
(* (( (ptr) gf←c27760)+17) ) = ((* (( (ptr) gf←c27760)+17) ) + (word) ( *( (fPt) ((* (ptr) pd96 ))))(250000, pd96));
};
SOURCE(7784, 69)
(* (( (ptr) gf←c27760)+14) ) = ((* (( (ptr) gf←c27760)+14) ) + 1);
SOURCE(7856, 173)
if ((0 == (* (( (ptr) gf←c27760)+9) ))) {
SOURCE(7901, 128)
(void) NewRecordingMarker←P600((* (ptr) (* (( (ptr) gf←c27760)+12) ) ), (((* (( (ptr) gf←c27760)+13) ) + (* (( (ptr) gf←c27760)+14)
)) - 1));
};
SOURCE(7453, 2021)
(void) (XR←MonitorExit((word) (( (bPt) gf←c27760)+16)/* LOCK←v3196 */ ));
return(stillRunning←v4632);
}
static void NewRecordingMarker←P600(formal←c0228, formal←c0229)
word formal←c0228;
word formal←c0229;
{
W8 var←c27792;
/* declaration of viewer←v4692 skipped */
/* declaration of loc←v4720 skipped */
register ptr gf←c27824 = (ptr) &globalframe;
/* declaration of var←c26192 skipped */
var←c27792.f4/* viewer←v4692 */ = formal←c0228;
var←c27792.f5/* loc←v4720 */ = formal←c0229;
/* NewRecordingMarker: */
SOURCE(8035, 1439)
{
word tmpAddr97;
tmpAddr97 = (word) (( (ptr) &var←c27792)+6)/* var←c26192 */ ;
(* (ptr) tmpAddr97 ) = ( ((word) (fPt) DoIt←P1356) );
(* (( (ptr) tmpAddr97) + 1) ) = 1;
};
SOURCE(8371, 1103)
{
word var←c26224;
{
word pd98;
pd98 = (* (( (ptr) (* (( (ptr) gf←c27824)+123)/* var←c25744 */ ))+93) );
var←c26224 = (word) ( *( (fPt) ((* (ptr) pd98 ))))(var←c27792.f4/* viewer←v4692 */ , pd98);
};
{
word pd99;
pd99 = (* (( (ptr) (* (( (ptr) gf←c27824)+123)/* var←c25744 */ ))+118) );
(void) ( *( (fPt) ((* (ptr) pd99 ))))((word) (( (bPt) &var←c27792)+24)/* var←c26192 */ , var←c26224, pd99);
};
};
}
static void DoIt←P1356(root←v5640, formal←c27888)
word root←v5640;
word formal←c27888;
{
register ptr gf←c27856 = (ptr) &globalframe;
formal←c27888 = (formal←c27888 - 24);
/* DoIt: */
SOURCE(8114, 1360)
SOURCE(8154, 71)
if ( ! ((* (( (bPt) (* (( (ptr) formal←c27888)+4) ))+76) ) & 04)) {
SOURCE(8184, 41)
{
word pd100;
pd100 = (* (( (ptr) (* (( (ptr) gf←c27856)+120)/* var←c25584 */ ))+16) );
(void) ( *( (fPt) ((* (ptr) pd100 ))))((* ((( (ptr) formal←c27888)+4)) ), pd100);
};
};
SOURCE(8227, 1247)
{
W2 var←c26352;
{
word var←c26256;
word var←c26288;
{
word pd101;
pd101 = (* (( (ptr) (* (( (ptr) gf←c27856)+123)/* var←c25744 */ ))+91) );
var←c26256 = (word) ( *( (fPt) ((* (ptr) pd101 ))))(root←v5640, pd101);
};
{
word pd102;
pd102 = (* (( (ptr) (* (( (ptr) gf←c27856)+129)/* var←c26320 */ ))+11) );
var←c26288 = (word) ( *( (fPt) ((* (ptr) pd102 ))))((* ((( (ptr) gf←c27856)+54)) ), pd102);
};
{
W2 var←c0104;
{
word pd103;
pd103 = (* (( (ptr) (* (( (ptr) gf←c27856)+124)/* var←c25808 */ ))+37) );
(void) ( *( (fPt) ((* (ptr) pd103 ))))((word) &var←c0104, root←v5640, var←c26256, (* (( (ptr) formal←c27888)+5) ), 0, (* (
( (ptr) gf←c27856)+53) )
, var←c26288, 0, 0, 0, pd103);
};
var←c26352 = var←c0104;
};
};
};
}
static void StopRecording←P660()
{
W13 var←c27920;
register ptr gf←c27952 = (ptr) &globalframe;
/* declaration of var←c26384 skipped */
/* StopRecording: */
SOURCE(8433, 3555)
{
word tmpAddr104;
tmpAddr104 = (word) (( (ptr) &var←c27920)+4)/* var←c26384 */ ;
(* (ptr) tmpAddr104 ) = ( ((word) (fPt) AddVoice←P1512) );
(* (( (ptr) tmpAddr104) + 1) ) = 1;
};
(void) (XR←MonitorEntry((word) (( (bPt) gf←c27952)+16)/* LOCK←v3196 */ ));
SOURCE(8470, 50)
if ((0 == (* (( (ptr) gf←c27952)+8) ))) {
SOURCE(8514, 6)
(void) (XR←MonitorExit((word) (( (bPt) gf←c27952)+16)/* LOCK←v3196 */ ));
return;
};
SOURCE(8522, 71)
if (((* (( (ptr) gf←c27952)+18) ) == 2)) {
SOURCE(8561, 32)
(* (( (ptr) gf←c27952)+18) ) = 1;
};
SOURCE(8595, 97)
lab←L100012: ;
if ( ( ((* (( (ptr) gf←c27952)+19) ) == 0) ? ((* (( (ptr) gf←c27952)+16) ) == (* (( (ptr) gf←c27952)+65) )) : 0 ) ) {
}
else {
goto lab←L100010;
};
SOURCE(8666, 26)
(void) (XR←Wait((word) (( (bPt) gf←c27952)+16)/* LOCK←v3196 */ , (word) (( (bPt) gf←c27952)+104)/* recordingDone←v3280 */ )
);
goto lab←L100012;
lab←L100010: ;
SOURCE(8694, 62)
lab←L100015: ;
if (((* (( (ptr) gf←c27952)+18) ) != 0)) {
}
else {
goto lab←L100013;
};
SOURCE(8735, 21)
(void) (XR←Wait((word) (( (bPt) gf←c27952)+16)/* LOCK←v3196 */ , (word) (( (bPt) gf←c27952)+80)/* timerOff←v3252 */ ));
goto lab←L100015;
lab←L100013: ;
SOURCE(8759, 42)
(* (( (ptr) gf←c27952)+8) ) = 0;
SOURCE(8803, 3185)
if ((0 != (* (( (ptr) gf←c27952)+9) ))) {
SOURCE(8847, 1246)
{
/* declaration of badTarget←v5668 skipped */
SOURCE(8849, 26)
(* (( (ptr) &var←c27920)+6)/* badTarget←v5668 */ ) = 0;
SOURCE(8877, 1210)
if (((* (( (ptr) gf←c27952)+19) ) == 0) || ( (int)(* (( (ptr) (* (( (ptr) gf←c27952)+19) ))+2) ) == (int)0)) {
SOURCE(8951, 69)
(void) BlinkMessageWindow←P300((* ((( (ptr) gf←c27952)+55)) ));
}
else {
SOURCE(9020, 1071)
{
/* declaration of targetChar←v5740 skipped */
/* declaration of node←v5768 skipped */
SOURCE(9293, 33)
(* (( (ptr) &var←c27920)+7) ) = 0;
(* (( (ptr) &var←c27920)+8) ) = 0;
SOURCE(9328, 18)
(* (( (ptr) &var←c27920)+9)/* node←v5768 */ ) = 0;
SOURCE(9348, 126)
SOURCE(9348, 126)
{
/* declaration of var←c03 skipped */
(* (( (ptr) &var←c27920)+10)/* var←c03 */ ) = (* (( (ptr) (* (( (ptr) gf←c27952)+125)/* var←c25840 */ ))+14) );
{
/* declaration of var←c04 skipped */
{
word var←c05;
{
word var←c0216;
var←c0216 = (word) &var←c27920;
var←c05 = (word) XR←Enable(( ((word) (fPt) NoName←Q2040) ), ( ((word) (fPt) NoName←Q2100) ), var←c0216);
};
if ((var←c05 == 3)) {
goto lab←L100017;
};
};
(* (W2Pt) (( (ptr) &var←c27920)+7)/* targetChar←v5740 */ ) = (* (W2Pt) (( (ptr) &var←c27920)+11)/* var←c04 */ );
};
};
lab←L100017: ;
SOURCE(9488, 22)
(* (( (ptr) &var←c27920)+9)/* node←v5768 */ ) = (* (( (ptr) &var←c27920)+7) );
SOURCE(9537, 550)
{
word pd105;
word pd107;
pd105 = (* (( (ptr) (* (( (ptr) gf←c27952)+124)/* var←c25808 */ ))+6) );
if (( (int)(word) ( *( (fPt) ((* (ptr) pd105 ))))((* ((( (ptr) &var←c27920)+9)/* node←v5768 */ ) ), pd105) <= (int)(* (
( (ptr) &var←c27920)+8) ))) { goto then0106;};
if ((0 != (* (( (ptr) &var←c27920)+6)/* badTarget←v5668 */ ))) { goto then0106;};
pd107 = (* (( (ptr) (* (( (ptr) gf←c27952)+124)/* var←c25808 */ ))+16) );
if (((word) ( *( (fPt) ((* (ptr) pd107 ))))((* (( (ptr) &var←c27920)+9)/* node←v5768 */ ), (* (( (ptr) &var←c27920)+8) ), (* (
( (ptr) gf←c27952)+50) ), pd107) != 0)) {
then0106: ;
SOURCE(9661, 287)
{
word voiceViewer←v5872 = 0;
SOURCE(9699, 100)
{
W3 var←c26448;
{
/*1*/ word pd108;
/*1*/ pd108 = (* (( (ptr) (* (( (ptr) gf←c27952)+120)/* var←c25584 */ ))+10) );
/*1*/ (void) ( *( (fPt) ((* (ptr) pd108 ))))((word) &var←c26448, (* (ptr) (* (( (ptr) gf←c27952)+19) ) ), 0, 1, pd108);
/*1*/ };
voiceViewer←v5872 = var←c26448.f0;
};
SOURCE(9801, 46)
{
word pd109;
pd109 = (* (( (ptr) (* (( (ptr) gf←c27952)+120)/* var←c25584 */ ))+16) );
(void) ( *( (fPt) ((* (ptr) pd109 ))))(voiceViewer←v5872, pd109);
};
SOURCE(9849, 97)
(void) BlinkMessageWindow←P300((* ((( (ptr) gf←c27952)+56)) ));
};
}
else {
SOURCE(9957, 64)
{
word pd110;
pd110 = (* (( (ptr) (* (( (ptr) gf←c27952)+125)/* var←c25840 */ ))+16) );
(void) ( *( (fPt) ((* (ptr) pd110 ))))((* (( (ptr) gf←c27952)+10) ), (* (( (ptr) gf←c27952)+51) ), pd110);
};
SOURCE(10023, 64)
{
word var←c26480;
{
word pd111;
pd111 = (* (( (ptr) (* (( (ptr) gf←c27952)+123)/* var←c25744 */ ))+83) );
var←c26480 = (word) ( *( (fPt) ((* (ptr) pd111 ))))((* ((( (ptr) &var←c27920)+7)) ), pd111);
};
{
word pd112;
pd112 = (* (( (ptr) (* (( (ptr) gf←c27952)+123)/* var←c25744 */ ))+118) );
(void) ( *( (fPt) ((* (ptr) pd112 ))))((word) (( (bPt) &var←c27920)+16)/* var←c26384 */ , var←c26480, pd112);
};
};
};
};
};
};
};
}
else {
SOURCE(10100, 1888)
if (((* (( (ptr) (* (( (ptr) (* (( (ptr) gf←c27952)+12) ))+1) ))+2) ) == 0)) {
SOURCE(10182, 531)
if (((* (( (ptr) gf←c27952)+19) ) == 0) || ( (int)(* (( (ptr) (* (( (ptr) gf←c27952)+19) ))+2) ) == (int)0)) {
SOURCE(10258, 69)
(void) BlinkMessageWindow←P300((* ((( (ptr) gf←c27952)+60)) ));
SOURCE(10329, 68)
(* (( (ptr) (* (( (ptr) (* (( (ptr) gf←c27952)+12) ))+1) ))+12) ) = 0;
SOURCE(10399, 69)
{
word pd113;
pd113 = (* (( (ptr) (* (( (ptr) gf←c27952)+122)/* var←c25648 */ ))+15) );
(void) ( *( (fPt) ((* (ptr) pd113 ))))((* (( (ptr) (* (ptr) (* (( (ptr) gf←c27952)+12) ) ))+22) ), 1, pd113);
};
}
else {
SOURCE(10477, 71)
{
word pd114;
pd114 = (* (( (ptr) (* (( (ptr) gf←c27952)+120)/* var←c25584 */ ))+16) );
(void) ( *( (fPt) ((* (ptr) pd114 ))))((* (ptr) ((* (( (ptr) gf←c27952)+12) )) ), pd114);
};
SOURCE(10550, 163)
{
word pd115;
pd115 = (* (( (ptr) (* (( (ptr) gf←c27952)+120)/* var←c25584 */ ))+11) );
(void) ( *( (fPt) ((* (ptr) pd115 ))))((* (ptr) (* (( (ptr) gf←c27952)+12) ) ), (* (( (ptr) (* (( (ptr) gf←c27952)+12) ))+1)
), (* (ptr) (* (( (ptr) gf←c27952)+19) ) ), 0, 1, pd115);
};
};
}
else {
SOURCE(10723, 1265)
if (((* (( (ptr) gf←c27952)+19) ) == 0) || ( (int)(* (( (ptr) (* (( (ptr) gf←c27952)+19) ))+2) ) == (int)0)) {
SOURCE(10797, 524)
{
word trueContents←v5916;
W2 var←c0114;
SOURCE(10799, 111)
{
word pd116;
pd116 = (* (( (ptr) (* (( (ptr) gf←c27952)+120)/* var←c25584 */ ))+44) );
(void) ( *( (fPt) ((* (ptr) pd116 ))))((word) &var←c0114, (* (( (ptr) (* (( (ptr) gf←c27952)+12) ))+1) ), 0, pd116);
};
trueContents←v5916 = var←c0114.f0;
SOURCE(10912, 84)
{
word pd117;
pd117 = (* (( (ptr) (* (( (ptr) gf←c27952)+126)/* var←c25904 */ ))+5) );
(void) ( *( (fPt) ((* (ptr) pd117 ))))((* (( (ptr) gf←c27952)+61) ), 1, pd117);
};
SOURCE(10998, 170)
{
word var←c26512;
word pd118;
pd118 = (* (( (ptr) (* (( (ptr) gf←c27952)+120)/* var←c25584 */ ))+34) );
var←c26512 = (word) ( *( (fPt) ((* (ptr) pd118 ))))((* (ptr) (* (( (ptr) gf←c27952)+12) ) ), trueContents←v5916, 0, 0, 0, (* (
( (ptr) (* (( (ptr) (* (( (ptr) gf←c27952)+12) ))+1) ))+6) )
, 0, 1, pd118);
};
SOURCE(11170, 80)
{
word pd119;
pd119 = (* (( (ptr) (* (( (ptr) gf←c27952)+120)/* var←c25584 */ ))+17) );
(void) ( *( (fPt) ((* (ptr) pd119 ))))((* (ptr) ((* (( (ptr) gf←c27952)+12) )) ), pd119);
};
SOURCE(11252, 69)
(* (( (ptr) (* (( (ptr) (* (( (ptr) gf←c27952)+12) ))+1) ))+12) ) = 0;
};
}
else {
SOURCE(11328, 660)
{
word newSoundList←v5960;
word newSound←v5988;
SOURCE(11330, 200)
{
word var←c26544;
{
word pd120;
pd120 = (* (( (ptr) (* (( (ptr) gf←c27952)+121)/* var←c25616 */ ))+23) );
var←c26544 = (word) ( *( (fPt) ((* (ptr) pd120 ))))((* (ptr) (* (( (ptr) (* (( (ptr) gf←c27952)+120)/* var←c25584 */ ))+6)
) ), (* (( (ptr) gf←c27952)+19) ), (word) -1, pd120);
};
{
word pd121;
pd121 = (* (( (ptr) (* (( (ptr) gf←c27952)+120)/* var←c25584 */ ))+41) );
newSoundList←v5960 = (word) ( *( (fPt) ((* (ptr) pd121 ))))(var←c26544, (* (( (ptr) (* (( (ptr) gf←c27952)+19) ))+2) ), pd121)
;
};
};
SOURCE(11532, 151)
newSound←v5988 = XR←NewObject(24, (* (( (ptr) gf←c27952)+44) ));
(* (W3Pt) newSound←v5988 ) = (* (W3Pt) (* (( (ptr) gf←c27952)+19) ) );
(* (( (ptr) newSound←v5988)+3) ) = newSoundList←v5960;
SOURCE(11686, 53)
(* (( (ptr) (* (( (ptr) gf←c27952)+12) ))+4) ) = 0;
SOURCE(11741, 71)
{
word pd122;
pd122 = (* (( (ptr) (* (( (ptr) gf←c27952)+120)/* var←c25584 */ ))+16) );
(void) ( *( (fPt) ((* (ptr) pd122 ))))((* (ptr) ((* (( (ptr) gf←c27952)+12) )) ), pd122);
};
SOURCE(11814, 103)
{
W3 var←c26608;
{
word pd123;
pd123 = (* (( (ptr) (* (( (ptr) gf←c27952)+120)/* var←c25584 */ ))+48) );
(void) ( *( (fPt) ((* (ptr) pd123 ))))((word) &var←c26608, (* (( (ptr) gf←c27952)+12) ), newSound←v5988, 1, 1, pd123);
};
};
SOURCE(11919, 69)
(* (( (ptr) (* (( (ptr) (* (( (ptr) gf←c27952)+12) ))+1) ))+12) ) = 0;
};
};
};
};
SOURCE(8433, 3555)
(void) (XR←MonitorExit((word) (( (bPt) gf←c27952)+16)/* LOCK←v3196 */ ));
return;
}
static word NoName←Q2040(formal←c0200)
word formal←c0200;
{
register ptr gf←c0199 = (ptr) &globalframe;
SOURCE(9348, 126)
{
word pd124;
pd124 = (* (( (ptr) formal←c0200)+10) );
(void) ( *( (fPt) ((* (ptr) pd124 ))))((word) (( (bPt) formal←c0200)+44), (* (( (ptr) gf←c0199)+10) ), (* (( (ptr) gf←c0199)+51)
), pd124);
};
return(0);
}
static void AddVoice←P1512(root←v5844, formal←c28016)
word root←v5844;
word formal←c28016;
{
register ptr gf←c27984 = (ptr) &globalframe;
formal←c28016 = (formal←c28016 - 16);
/* AddVoice: */
SOURCE(9022, 16)
SOURCE(9066, 83)
{
word pd125;
pd125 = (* (( (ptr) (* (( (ptr) gf←c27984)+124)/* var←c25808 */ ))+17) );
(void) ( *( (fPt) ((* (ptr) pd125 ))))((* (( (ptr) formal←c28016)+9) ), (* (( (ptr) formal←c28016)+8) ), (* (( (ptr) gf←c27984)+50)
), (* (ptr) (* (( (ptr) gf←c27984)+19) ) ), 1, 0
, 0, pd125);
};
SOURCE(9151, 88)
{
word pd126;
pd126 = (* (( (ptr) (* (( (ptr) gf←c27984)+124)/* var←c25808 */ ))+17) );
(void) ( *( (fPt) ((* (ptr) pd126 ))))((* (( (ptr) formal←c28016)+9) ), (* (( (ptr) formal←c28016)+8) ), (* (( (ptr) gf←c27984)+57)
), (* (( (ptr) gf←c27984)+58) ), 1, 0
, 0, pd126);
};
}
static void NewDictationWindow←P720()
{
register ptr gf←c28048 = (ptr) &globalframe;
/* NewDictationWindow: */
SOURCE(11994, 351)
SOURCE(12033, 43)
(* (( (ptr) gf←c28048)+9) ) = 0;
SOURCE(12078, 68)
(* (( (ptr) gf←c28048)+12) ) = XR←NewObject(24, (* (( (ptr) gf←c28048)+37) ));
SOURCE(12148, 158)
{
W3 var←c26672;
{
word pd127;
pd127 = (* (( (ptr) (* (( (ptr) gf←c28048)+120)/* var←c25584 */ ))+10) );
(void) ( *( (fPt) ((* (ptr) pd127 ))))((word) &var←c26672, 0, 0, 1, pd127);
};
(* (( (ptr) (* (( (ptr) gf←c28048)+12) ))+1) ) = var←c26672.f1;
(* (ptr) (* (( (ptr) gf←c28048)+12) ) ) = var←c26672.f0;
};
SOURCE(12308, 37)
(* (( (ptr) gf←c28048)+13) ) = 1;
}
static void DictationMachine←P780(formal←c0128, viewer←v19952)
word formal←c0128;
word viewer←v19952;
{
register ptr gf←c28080 = (ptr) &globalframe;
word recordAtom←v19996;
word quit←v20024;
/* DictationMachine: */
SOURCE(12350, 477)
(void) (XR←MonitorEntry((word) (( (bPt) gf←c28080)+16)/* LOCK←v3196 */ ));
SOURCE(12350, 477)
recordAtom←v19996 = 1;
SOURCE(12350, 477)
quit←v20024 = 0;
SOURCE(12407, 127)
if ((0 != (* (( (ptr) gf←c28080)+8) ))) {
SOURCE(12454, 23)
(void) ChangeVoiceInputFocus←P840();
SOURCE(12527, 7)
goto lab←L100021;
};
SOURCE(12538, 119)
{
word pd128;
pd128 = (* (( (ptr) (* (( (ptr) gf←c28080)+120)/* var←c25584 */ ))+29) );
if ((0 != (word) ( *( (fPt) ((* (ptr) pd128 ))))(pd128))) {
SOURCE(12587, 61)
(void) BlinkMessageWindow←P300((* ((( (ptr) gf←c28080)+62)) ));
SOURCE(12650, 7)
goto lab←L100021;
};
};
SOURCE(12752, 34)
{
word pd129;
pd129 = (* (( (ptr) (* (( (ptr) gf←c28080)+120)/* var←c25584 */ ))+30) );
(void) ( *( (fPt) ((* (ptr) pd129 ))))(pd129);
};
SOURCE(12789, 20)
(void) NewDictationWindow←P720();
SOURCE(12811, 16)
(void) StartRecording←P360(1);
/* removed tail goto */
lab←L100021: ;
(void) (XR←MonitorExit((word) (( (bPt) gf←c28080)+16)/* LOCK←v3196 */ ));
(* (ptr) formal←c0128 ) = recordAtom←v19996;
(* (( (ptr) formal←c0128)+1) ) = quit←v20024;
return;
}
static void ChangeVoiceInputFocus←P840()
{
W9 var←c28112;
register ptr gf←c28144 = (ptr) &globalframe;
/* declaration of var←c26704 skipped */
/* ChangeVoiceInputFocus: */
SOURCE(12833, 2488)
{
word tmpAddr130;
tmpAddr130 = (word) (( (ptr) &var←c28112)+4)/* var←c26704 */ ;
(* (ptr) tmpAddr130 ) = ( ((word) (fPt) AddVoiceWindowMarker←P1812) );
(* (( (ptr) tmpAddr130) + 1) ) = 1;
};
SOURCE(12874, 522)
if ((0 == (* (( (ptr) gf←c28144)+9) ))) {
SOURCE(12922, 154)
if (((* (( (ptr) (* (( (ptr) (* (( (ptr) gf←c28144)+12) ))+1) ))+2) ) == 0)) {
SOURCE(13005, 62)
(void) BlinkMessageWindow←P300((* ((( (ptr) gf←c28144)+67)) ));
SOURCE(13069, 7)
return;
};
SOURCE(13080, 172)
{
word pd131;
word x132;
pd131 = (* (( (ptr) (* (( (ptr) gf←c28144)+120)/* var←c25584 */ ))+63) );
(void) ( *( (fPt) ((* (ptr) pd131 ))))((* (ptr) (* (( (ptr) gf←c28144)+12) ) ), (x132 = (IOP2( / , (int)(* (( (ptr) (* (
( (ptr) gf←c28144)+12) ))+3) ), (int)2000) - 1),
MAX((int)(word), x132, 0)), pd131);
};
SOURCE(13254, 71)
{
word pd133;
pd133 = (* (( (ptr) (* (( (ptr) gf←c28144)+126)/* var←c25904 */ ))+5) );
(void) ( *( (fPt) ((* (ptr) pd133 ))))((* (( (ptr) gf←c28144)+68) ), 1, pd133);
};
SOURCE(13327, 69)
(* (( (ptr) (* (( (ptr) (* (( (ptr) gf←c28144)+12) ))+1) ))+12) ) = 0;
};
SOURCE(13400, 1921)
{
word currentContents←v6032;
word wasIntoText←v6060;
SOURCE(13403, 32)
currentContents←v6032 = (* (( (ptr) gf←c28144)+69) );
SOURCE(13437, 58)
wasIntoText←v6060 = (* (( (ptr) gf←c28144)+9) );
SOURCE(13536, 20)
(void) NewDictationWindow←P720();
SOURCE(13639, 1400)
if ((0 != wasIntoText←v6060)) {
SOURCE(13659, 1380)
{
/* declaration of targetChar←v6132 skipped */
/* declaration of node←v6160 skipped */
SOURCE(14265, 97)
{
word pd134;
pd134 = (* (( (ptr) (* (( (ptr) gf←c28144)+125)/* var←c25840 */ ))+14) );
(void) ( *( (fPt) ((* (ptr) pd134 ))))((word) (( (bPt) &var←c28112)+24)/* targetChar←v6132 */ , (* (( (ptr) gf←c28144)+10)
), (* (( (ptr) gf←c28144)+51) ), pd134);
};
SOURCE(14364, 36)
(* (( (ptr) &var←c28112)+8)/* node←v6160 */ ) = (* (( (ptr) &var←c28112)+6) );
SOURCE(14427, 46)
if (((* (( (ptr) gf←c28144)+10) ) != (* (( (ptr) &var←c28112)+6) ))) {
SOURCE(14473, 5)
(void) XR←RaiseUnnamedError();
};
SOURCE(14524, 64)
{
word pd135;
pd135 = (* (( (ptr) (* (( (ptr) gf←c28144)+125)/* var←c25840 */ ))+16) );
(void) ( *( (fPt) ((* (ptr) pd135 ))))((* (( (ptr) gf←c28144)+10) ), (* (( (ptr) gf←c28144)+51) ), pd135);
};
SOURCE(14590, 73)
{
word pd136;
pd136 = (* (( (ptr) (* (( (ptr) gf←c28144)+124)/* var←c25808 */ ))+16) );
if (((word) ( *( (fPt) ((* (ptr) pd136 ))))((* (( (ptr) &var←c28112)+8)/* node←v6160 */ ), (* (( (ptr) &var←c28112)+7) ), (* (
( (ptr) gf←c28144)+50) ), pd136) != 0)) {
SOURCE(14657, 6)
return;
};
};
SOURCE(14739, 79)
{
word pd137;
pd137 = (* (( (ptr) (* (( (ptr) gf←c28144)+124)/* var←c25808 */ ))+16) );
if (((word) ( *( (fPt) ((* (ptr) pd137 ))))((* (( (ptr) &var←c28112)+8)/* node←v6160 */ ), (* (( (ptr) &var←c28112)+7) ), (* (
( (ptr) gf←c28144)+70) ), pd137) != 0)) {
SOURCE(14812, 6)
return;
};
};
SOURCE(14821, 218)
{
word var←c26736;
{
word pd138;
pd138 = (* (( (ptr) (* (( (ptr) gf←c28144)+123)/* var←c25744 */ ))+83) );
var←c26736 = (word) ( *( (fPt) ((* (ptr) pd138 ))))((* ((( (ptr) &var←c28112)+6)) ), pd138);
};
{
word pd139;
pd139 = (* (( (ptr) (* (( (ptr) gf←c28144)+123)/* var←c25744 */ ))+118) );
(void) ( *( (fPt) ((* (ptr) pd139 ))))((word) (( (bPt) &var←c28112)+16)/* var←c26704 */ , var←c26736, pd139);
};
};
};
};
SOURCE(15043, 107)
{
register word i←v6308 = 1;
register word noName←c26768;
noName←c26768 = (* (( (ptr) gf←c28144)+14) );
if (( (int)i←v6308 > (int)noName←c26768)) {
goto lab←L100022;
};
lab←L100025: ;
SOURCE(15097, 53)
{
word pd140;
pd140 = (* (( (ptr) (* (( (ptr) gf←c28144)+130)/* var←c26800 */ ))+6) );
currentContents←v6032 = (word) ( *( (fPt) ((* (ptr) pd140 ))))(currentContents←v6032, (* (( (ptr) gf←c28144)+53) ), pd140)
;
};
if (( (int)i←v6308 >= (int)noName←c26768)) {
goto lab←L100022;
};
i←v6308 = (i←v6308 + 1);
goto lab←L100025;
lab←L100022: ;
};
SOURCE(15152, 45)
{
word pd141;
pd141 = (* (( (ptr) (* (( (ptr) gf←c28144)+130)/* var←c26800 */ ))+6) );
currentContents←v6032 = (word) ( *( (fPt) ((* (ptr) pd141 ))))(currentContents←v6032, (* (( (ptr) gf←c28144)+69) ), pd141)
;
};
SOURCE(15199, 122)
{
word var←c26832;
word pd142;
pd142 = (* (( (ptr) (* (( (ptr) gf←c28144)+120)/* var←c25584 */ ))+34) );
var←c26832 = (word) ( *( (fPt) ((* (ptr) pd142 ))))((* (ptr) (* (( (ptr) gf←c28144)+12) ) ), currentContents←v6032, 0, 0, 0, 0
, 0, 1, pd142);
};
};
}
static void AddVoiceWindowMarker←P1812(root←v6236, formal←c28208)
word root←v6236;
word formal←c28208;
{
register ptr gf←c28176 = (ptr) &globalframe;
word alreadyEdited←v6264;
formal←c28208 = (formal←c28208 - 16);
/* AddVoiceWindowMarker: */
SOURCE(13661, 28)
SOURCE(13717, 61)
alreadyEdited←v6264 = (((unsigned)(* (( (bPt) (* (( (ptr) gf←c28176)+11) ))+76) ) << 29) >> 31);
SOURCE(13780, 88)
{
word pd143;
pd143 = (* (( (ptr) (* (( (ptr) gf←c28176)+124)/* var←c25808 */ ))+17) );
(void) ( *( (fPt) ((* (ptr) pd143 ))))((* (( (ptr) formal←c28208)+8) ), (* (( (ptr) formal←c28208)+7) ), (* (( (ptr) gf←c28176)+57)
), (* (( (ptr) gf←c28176)+58) ), 1, 0
, 0, pd143);
};
SOURCE(13918, 219)
{
word var←c26864;
{
word var←c26896;
word var←c26992;
{
word var←c26928;
{
word pd144;
pd144 = (* (( (ptr) (* (( (ptr) gf←c28176)+131)/* var←c26960 */ ))+27) );
var←c26928 = (word) ( *( (fPt) ((* (ptr) pd144 ))))((* (( (ptr) (* (( (ptr) (* (( (ptr) gf←c28176)+12) ))+1) ))+1) ), 8, 1, pd144)
;
};
{
word pd145;
pd145 = (* (( (ptr) (* (( (ptr) gf←c28176)+130)/* var←c26800 */ ))+6) );
var←c26896 = (word) ( *( (fPt) ((* (ptr) pd145 ))))((* (( (ptr) gf←c28176)+72) ), var←c26928, pd145);
};
};
var←c26992 = XR←NewObject(4, (* (( (ptr) gf←c28176)+35) ));
(* (ptr) var←c26992 ) = var←c26896;
var←c26864 = var←c26992;
};
{
word pd146;
pd146 = (* (( (ptr) (* (( (ptr) gf←c28176)+124)/* var←c25808 */ ))+17) );
(void) ( *( (fPt) ((* (ptr) pd146 ))))((* (( (ptr) formal←c28208)+8) ), (* (( (ptr) formal←c28208)+7) ), (* (( (ptr) gf←c28176)+70)
), var←c26864, 1, 0
, 0, pd146);
};
};
SOURCE(14139, 119)
{
word pd147;
pd147 = (* (( (ptr) (* (( (ptr) gf←c28176)+120)/* var←c25584 */ ))+14) );
(void) ( *( (fPt) ((* (ptr) pd147 ))))((* (( (ptr) (* (( (ptr) gf←c28176)+12) ))+1) ), (* (( (ptr) gf←c28176)+11) ), (* (W2Pt) (
( (ptr) formal←c28208)+6) ), pd147);
};
}
static void RecordInPlaceOfSelection←P900(selection←v4828)
word selection←v4828;
{
register ptr gf←c28240 = (ptr) &globalframe;
/* RecordInPlaceOfSelection: */
SOURCE(15327, 693)
(void) (XR←MonitorEntry((word) (( (bPt) gf←c28240)+16)/* LOCK←v3196 */ ));
{
W3 var←c0146;
word var←c0217;
SOURCE(15416, 41)
(* (( (ptr) gf←c28240)+12) ) = selection←v4828;
SOURCE(15459, 43)
(* (( (ptr) gf←c28240)+9) ) = 0;
SOURCE(15505, 223)
if (( (int)(* (( (ptr) (* (( (ptr) gf←c28240)+12) ))+4) ) != (int)0)) {
SOURCE(15590, 138)
{
word pd148;
pd148 = (* (( (ptr) (* (( (ptr) gf←c28240)+120)/* var←c25584 */ ))+48) );
(void) ( *( (fPt) ((* (ptr) pd148 ))))((word) &var←c0146, (* (( (ptr) gf←c28240)+12) ), 0, 0, 1, pd148);
};
var←c0217 = var←c0146.f0;
if ((0 != var←c0217)) {
SOURCE(15708, 20)
(void) NewDictationWindow←P720();
};
};
SOURCE(15881, 121)
(* (( (ptr) gf←c28240)+13) ) = IOP2( / , (int)(* (( (ptr) (* (( (ptr) gf←c28240)+12) ))+3) ), (int)2000);
SOURCE(16004, 16)
(void) StartRecording←P360(1);
};
SOURCE(15327, 693)
(void) (XR←MonitorExit((word) (( (bPt) gf←c28240)+16)/* LOCK←v3196 */ ));
return;
}
static void ForkStopRecording←P960()
{
register ptr gf←c28272 = (ptr) &globalframe;
/* ForkStopRecording: */
SOURCE(16026, 72)
SOURCE(16061, 37)
SOURCE(16062, 36)
{
W2 var←c27024;
{
W2 var←c0149;
word var←c0148;
var←c0148 = XR←ExtensionAlloc(4);
{
word tmpAddr149;
tmpAddr149 = (word) var←c0148;
(* (ptr) tmpAddr149 ) = ( ((word) (fPt) NoName←Q2280) );
(* (( (ptr) tmpAddr149) + 1) ) = 0;
(* (( (ptr) tmpAddr149) + 2) ) = (word) (( (bPt) gf←c28272)+380)/* var←c25168 */ ;
(* (( (ptr) tmpAddr149) + 3) ) = 0;
};
(void) XR←Fork((word) &var←c0149, var←c0148);
var←c27024 = var←c0149;
};
{
word pd150;
pd150 = (* (( (ptr) (* (( (ptr) gf←c28272)+127)/* var←c25968 */ ))+11) );
(void) ( *( (fPt) ((* (ptr) pd150 ))))(var←c27024, pd150);
};
};
}
static void ConversationReport←P1020(nb←v20084, cDesc←v20112, remark←v20140)
word nb←v20084;
word cDesc←v20112;
word remark←v20140;
{
register ptr gf←c28304 = (ptr) &globalframe;
/* ConversationReport: */
SOURCE(16103, 350)
SOURCE(16167, 286)
if ((cDesc←v20112 == 0)) {
SOURCE(16197, 256)
{
word pd151;
pd151 = (* (( (ptr) (* (( (ptr) gf←c28304)+121)/* var←c25616 */ ))+15) );
if ((XR←Narrow((word) ( *( (fPt) ((* (ptr) pd151 ))))((* (ptr) (* (( (ptr) (* (( (ptr) gf←c28304)+120)/* var←c25584 */ ))+6)
) ), cDesc←v20112, pd151), (* (( (ptr) gf←c28304)+36) )) == (* (( (ptr) gf←c28304)+71) ))) {
SOURCE(16311, 142)
{
word var←c27056;
var←c27056 = (* (( (ptr) cDesc←v20112)+3) );
switch (var←c27056) {
case 10:
break;
case 1: case 0: case 2:
SOURCE(16398, 34)
{
word pd152;
pd152 = (* (( (ptr) (* (( (ptr) gf←c28304)+120)/* var←c25584 */ ))+30) );
(void) ( *( (fPt) ((* (ptr) pd152 ))))(pd152);
};
SOURCE(16434, 19)
(void) ForkStopRecording←P960();
break;
};
};
};
};
};
}
static word RequestReport←P1080(formal←c0159)
word formal←c0159;
{
register ptr gf←c28336 = (ptr) &globalframe;
word betterActionRequest←v20300;
/* RequestReport: */
SOURCE(16471, 974)
SOURCE(16471, 974)
betterActionRequest←v20300 = 0;
SOURCE(16525, 35)
betterActionRequest←v20300 = (* (( (ptr) formal←c0159)+16)/* actionRequest←v20256 */ );
SOURCE(16562, 26)
if (((* (ptr) formal←c0159/* cDesc←v20200 */ ) == 0)) {
SOURCE(16582, 6)
return(betterActionRequest←v20300);
};
SOURCE(16590, 797)
{
word pd153;
pd153 = (* (( (ptr) (* (( (ptr) gf←c28336)+121)/* var←c25616 */ ))+15) );
if ((XR←Narrow((word) ( *( (fPt) ((* (ptr) pd153 ))))((* (ptr) (* (( (ptr) (* (( (ptr) gf←c28336)+120)/* var←c25584 */ ))+6)
) ), (* (ptr) formal←c0159/* cDesc←v20200 */ ), pd153), (* (( (ptr) gf←c28336)+36) )) == (* (( (ptr) gf←c28336)+71) ))) {
SOURCE(16704, 683)
{
word var←c27088;
var←c27088 = (* (( (ptr) formal←c0159)+13) );
if ((var←c27088 == (* (( (ptr) gf←c28336)+73) ))) {
SOURCE(16758, 217)
if (((* (( (ptr) formal←c0159)+12) ) == (* (( (ptr) gf←c28336)+15) ))) {
SOURCE(16816, 159)
{
word var←c27120;
var←c27120 = (* (( (ptr) formal←c0159)+14) );
if ((var←c27120 == (* (( (ptr) gf←c28336)+74) ))) {
}
else {
if ((var←c27120 == (* (( (ptr) gf←c28336)+75) ))) {
SOURCE(16892, 38)
SOURCE(16893, 37)
{
/*1*/ W2 var←c27152;
/*1*/ {
/*1*/ W2 var←c0165;
/*1*/ word var←c0164;
/*1*/ var←c0164 = XR←ExtensionAlloc(4);
/*1*/ {
/*1*/ word tmpAddr154;
/*1*/ tmpAddr154 = (word) var←c0164;
/*1*/ (* (ptr) tmpAddr154 ) = ( ((word) (fPt) NoName←Q2340) );
/*1*/ (* (( (ptr) tmpAddr154) + 1) ) = 0;
/*1*/ (* (( (ptr) tmpAddr154) + 2) ) = (word) (( (bPt) gf←c28336)+404)/* var←c25264 */ ;
/*1*/ (* (( (ptr) tmpAddr154) + 3) ) = 0;
/*1*/ };
/*1*/ (void) XR←Fork((word) &var←c0165, var←c0164);
/*1*/ var←c27152 = var←c0165;
/*1*/ };
/*1*/ {
/*1*/ word pd155;
/*1*/ pd155 = (* (( (ptr) (* (( (ptr) gf←c28336)+127)/* var←c25968 */ ))+11) );
/*1*/ (void) ( *( (fPt) ((* (ptr) pd155 ))))(var←c27152, pd155);
/*1*/ };
/*1*/ };
}
else {
if ((var←c27120 == (* (( (ptr) gf←c28336)+76) )) || (var←c27120 == (* (( (ptr) gf←c28336)+77) ))) {
SOURCE(16956, 19)
/*1*/ (void) ForkStopRecording←P960();
/*1*/ };
};
};
};
};
}
else {
if ((var←c27088 == (* (( (ptr) gf←c28336)+78) ))) {
SOURCE(17006, 381)
{
word var←c27184;
var←c27184 = (* (( (ptr) formal←c0159)+14) );
if ((var←c27184 == (* (( (ptr) gf←c28336)+74) ))) {
SOURCE(17056, 6)
return(betterActionRequest←v20300);
};
if ((var←c27184 == (* (( (ptr) gf←c28336)+75) ))) {
SOURCE(17076, 63)
{
word pd157;
pd157 = (* (( (ptr) (* (( (ptr) gf←c28336)+120)/* var←c25584 */ ))+32) );
(void) ( *( (fPt) ((* (ptr) pd157 ))))((* (( (ptr) formal←c0159)+12) ), 1, pd157);
};
goto endif0156;
};
if ((var←c27184 == (* (( (ptr) gf←c28336)+76) )) || (var←c27184 == (* (( (ptr) gf←c28336)+77) ))) {
SOURCE(17164, 63)
{
word pd158;
pd158 = (* (( (ptr) (* (( (ptr) gf←c28336)+120)/* var←c25584 */ ))+32) );
(void) ( *( (fPt) ((* (ptr) pd158 ))))((* (( (ptr) formal←c0159)+12) ), 2, pd158);
};
goto endif0156;
};
if ((var←c27184 == (* (( (ptr) gf←c28336)+79) ))) {
SOURCE(17241, 65)
{
word pd159;
pd159 = (* (( (ptr) (* (( (ptr) gf←c28336)+120)/* var←c25584 */ ))+32) );
(void) ( *( (fPt) ((* (ptr) pd159 ))))((* (( (ptr) formal←c0159)+12) ), 3, pd159);
};
goto endif0156;
};
if ((var←c27184 == (* (( (ptr) gf←c28336)+80) ))) {
SOURCE(17320, 67)
{
word pd160;
pd160 = (* (( (ptr) (* (( (ptr) gf←c28336)+120)/* var←c25584 */ ))+32) );
(void) ( *( (fPt) ((* (ptr) pd160 ))))((* (( (ptr) formal←c0159)+12) ), 4, pd160);
};
goto endif0156;
};
endif0156: ;
};
};
};
};
};
};
SOURCE(17410, 35)
betterActionRequest←v20300 = (* (( (ptr) formal←c0159)+16)/* actionRequest←v20256 */ );
SOURCE(16471, 974)
return(betterActionRequest←v20300);
}
static void NoName←Q2100(formal←c0173, formal←c200004, formal←c200005, formal←c200006, formal←c200007)
word formal←c0173;
word formal←c200004;
word formal←c200005;
word formal←c200006;
word formal←c200007;
{
register ptr gf←c0212 = (ptr) &globalframe;
if ((formal←c200005 == (* (( (ptr) (* (( (ptr) gf←c0212)+125)/* var←c25840 */ ))+15) ))) {
SOURCE(9458, 16)
(* (( (ptr) formal←c200004)+6) ) = 1;
SOURCE(9476, 8)
(* (ptr) formal←c0173 ) = 2;
(* (( (ptr) formal←c0173)+1) ) = 3;
return;
};
(* (ptr) formal←c0173 ) = 0;
(* (( (ptr) formal←c0173)+1) ) = 0;
return;
}
static void NoName←Q2160(formal←c0178, formal←c200000, formal←c200001, formal←c200002, formal←c200003)
word formal←c0178;
word formal←c200000;
word formal←c200001;
word formal←c200002;
word formal←c200003;
{
register ptr gf←c0213 = (ptr) &globalframe;
if ((formal←c200001 == (* (( (ptr) (* (( (ptr) gf←c0213)+123)/* var←c25744 */ ))+119) ))) {
SOURCE(5552, 22)
(* (( (ptr) formal←c200000)+15) ) = 0;
SOURCE(5576, 8)
(* (ptr) formal←c0178 ) = 2;
(* (( (ptr) formal←c0178)+1) ) = 2;
return;
};
(* (ptr) formal←c0178 ) = 0;
(* (( (ptr) formal←c0178)+1) ) = 0;
return;
}
static word NoName←Q2220(formal←c083)
word formal←c083;
{
word var←c085;
word var←c084;
/* intermediary proc for a FORK, nArgs: 1, nRets: 0 */
var←c085 = (* (( (ptr) formal←c083)+4) );
var←c084 = (* (( (ptr) formal←c083)+2) );
formal←c083 = XR←ExtensionFree(formal←c083);
(void) ( *( (fPt) ((* (ptr) var←c084 ))))(var←c085, var←c084);
return(0);
}
static word NoName←Q2280(formal←c0150)
word formal←c0150;
{
word var←c0151;
/* intermediary proc for a FORK, nArgs: 0, nRets: 0 */
var←c0151 = (* (( (ptr) formal←c0150)+2) );
formal←c0150 = XR←ExtensionFree(formal←c0150);
(void) ( *( (fPt) ((* (ptr) var←c0151 ))))(var←c0151);
return(0);
}
static word NoName←Q2340(formal←c0166)
word formal←c0166;
{
word var←c0167;
/* intermediary proc for a FORK, nArgs: 0, nRets: 0 */
var←c0167 = (* (( (ptr) formal←c0166)+2) );
formal←c0166 = XR←ExtensionFree(formal←c0166);
(void) ( *( (fPt) ((* (ptr) var←c0167 ))))(var←c0167);
return(0);
}
/* file: VoiceRecordImpl, module: VoiceRecordImpl, compiled at: June 7, 1992 11:36:21 am PDT */
extern void XR←install←VoiceRecordImpl() {
NoName←Q1920();
}
extern void XR←run←VoiceRecordImpl() { XR←Start(&globalframe); }