(saveFormat "2.0")
(date "Sat 01/Mar/1997 22:27:21 ")
(veerev "3.21")
(platform "PC")
(SaveCF no)
(filterNAN 0)
(component 0 ROOTCONTEXT
 (name "Untitled")
 (implementation
  (UserFunctions
   (nextID 2)
   (context 0
	(name "RetrieveStrokes")
	(interface
	 (output 1
	  (type data)
	  (name "X")
	  (lock constraints)
	  (optional yes)
	 )
	)
	(implementation
	 (locked no)
	 (trigMode deg)
	 (nextID 4)
	 (popupMoveable)
	 (component 0 CALL
	  (name "Call myLibrary.nKeyStrokes")
	  (interface
	   (output 1
		(name "Ret Value")
		(lock name constraints)
		(optional yes)
	   )
	  )
	  (implementation
	   (callFunc "myLibrary.nKeyStrokes")
	   (parmMode "rev30")
	  )
	 )
	 (component 1 IFTHENELSE
	  (interface
	   (input 1
		(name "A")
		(optional yes)
	   )
	   (output 1
		(name "Then")
		(lock name constraints)
	   )
	   (output 2
		(name "Else")
		(lock name constraints)
	   )
	  )
	  (implementation
	   (expr "a>0")
	  )
	 )
	 (component 2 ALLOCATEARRAY
	  (name "Alloc Integer")
	  (interface
	   (input 1
		(name "Dim Size 1")
		(tag "Dim Size 1")
		(requires
		 (datatype Int32)
		 (shape "Scalar")
		)
		(lock constraints)
		(optional yes)
		(buffer YES)
	   )
	   (output 1
		(name "Array")
		(tag "Array")
		(lock constraints)
	   )
	  )
	  (implementation
	   (numDims 1)
	   (dimSizes "4")
	   (type "Int32")
	   (initEnum "Init Value")
	   (initialValue
		(data  0)
	   )
	   (from 1)
	   (thru 10)
	  )
	 )
	 (component 3 CALL
	  (name "Call myLibrary.getKeyStrokes")
	  (interface
	   (input 1
		(name "keyStrokeArray")
		(requires
		 (datatype Int32)
		)
		(optional yes)
	   )
	   (input 2
		(name "nArrayElements")
		(requires
		 (datatype Int32)
		)
		(optional yes)
	   )
	   (output 1
		(name "Ret Value")
		(lock name constraints)
		(optional yes)
	   )
	   (output 2
		(name "keyStrokeArray")
		(lock name constraints)
		(optional yes)
	   )
	   (output 3
		(name "nArrayElements")
		(lock name constraints)
		(optional yes)
	   )
	  )
	  (implementation
	   (callFunc "myLibrary.getKeyStrokes")
	   (parmMode "rev30")
	  )
	 )
	 (configuration
	  (connect D0:1 D1:1)
	  (connect D1:1 D2:0)
	  (connect D0:1 D2:1)
	  (connect D2:1 D3:1)
	  (connect D0:1 D3:2)
	  (connect D3:2 O1:1)
	 )
	)
	(viewFor 0
	 (active detail)
	 (detail
	  (geometry 55 53 832 432)
	  (configuration
	   (viewFor 0
		(active detail)
		(icon
		 (geometry 0 0 191 0)
		)
		(detail
		 (geometry 122 94 196 53)
		)
		(terminals on)
	   )
	   (viewFor 1
		(active detail)
		(icon
		)
		(detail
		 (geometry 508 144 55 53)
		)
		(terminals on)
	   )
	   (viewFor 2
		(active detail)
		(icon
		)
		(detail
		 (geometry 166 242 208 117)
		)
		(terminals on)
	   )
	   (viewFor 3
		(active detail)
		(icon
	   (geometry 0 0 191 0)
	  )
		(detail
		 (geometry 562 289 196 62)
		)
		(terminals on)
	   )
	   (connect D0:1 D1:1
		(points 4 390 120 410 120 410 170 475 170)
	   )
	   (connect D1:1 D2:0
		(points 7 605 160 630 160 630 220 460 220 460 200 250 200 250 221)
	   )
	   (connect D0:1 D2:1
		(points 6 390 120 410 120 410 180 60 180 60 300 83 300)
	   )
	   (connect D2:1 D3:1
		(points 2 416 300 449 300)
	   )
	   (connect D0:1 D3:2
		(points 8 390 120 410 120 410 170 450 170 450 250 440 250 440 340 449 340)
	   )
	   (connect D3:2 O1:1
		(points 4 870 320 880 320 880 270 886 270)
	   )
	  )
	  (stackingOrder 0 1 3 2)
	 )
	 (terminals on)
	)
   )
   (context 1
	(name "BufferContains")
	(interface
	 (input 1
	  (name "A")
	  (requires
	   (datatype Int32)
	   (shape "Scalar")
	  )
	  (optional yes)
	 )
	 (output 1
	  (type data)
	  (name "X")
	  (lock constraints)
	  (optional yes)
	 )
	)
	(implementation
	 (locked no)
	 (trigMode deg)
	 (nextID 16)
	 (popupMoveable)
	 (component 0 CALL
	  (name "Call RetrieveStrokes")
	  (interface
	   (output 1
		(name "X")
		(lock name constraints)
		(optional yes)
	   )
	  )
	  (implementation
	   (callFunc "RetrieveStrokes")
	   (parmMode "rev30")
	  )
	 )
	 (component 5 CONSTANT
	  (name "0")
	  (interface
	   (output 1
		(name "Int32")
		(lock name constraints)
	   )
	  )
	  (implementation
	   (value Int32
		(data  0)
	   )
	   (initValue Int32
		(data  0)
	   )
	  )
	 )
	 (component 7 ALLOCATEARRAY
	  (name "Alloc Integer")
	  (interface
	   (input 1
		(name "Init Value")
		(tag "Init Value")
		(requires
		 (datatype Int32)
		 (shape "Scalar")
		)
		(lock constraints)
		(optional yes)
		(buffer YES)
	   )
	   (input 2
		(name "Dim Size 1")
		(tag "Dim Size 1")
		(requires
		 (datatype Int32)
		 (shape "Scalar")
		)
		(lock constraints)
		(optional yes)
		(buffer YES)
	   )
	   (output 1
		(name "Array")
		(tag "Array")
		(lock constraints)
	   )
	  )
	  (implementation
	   (numDims 1)
	   (dimSizes "4")
	   (type "Int32")
	   (initEnum "Init Value")
	   (initialValue
		(data  39)
	   )
	   (from 1)
	   (thru 10)
	  )
	 )
	 (component 8 COMPARATOR
	  (interface
	   (input 1
		(name "Ref Value")
		(tag "RefValue")
	   )
	   (input 2
		(name "Test Value")
		(tag "TestValue")
	   )
	   (output 1
		(name "Passed")
		(tag "Passed")
		(lock name constraints)
		(optional yes)
	   )
	   (output 2
		(name "Failed")
		(tag "Failed")
		(lock name constraints)
		(optional yes)
	   )
	   (output 3
		(name "Failures")
		(tag "Failures")
		(lock name constraints)
		(optional yes)
	   )
	  )
	  (implementation
	   (relation "!=")
	  )
	 )
	 (component 10 IFTHENELSE
	  (interface
	   (input 1
		(name "A")
		(optional yes)
	   )
	   (output 1
		(name "Then")
		(lock name constraints)
	   )
	   (output 2
		(name "Else")
		(lock name constraints)
	   )
	  )
	  (implementation
	   (expr "totsize(a)>0")
	  )
	 )
	 (component 12 CONSTANT
	  (name "0")
	  (interface
	   (output 1
		(name "Int32")
		(lock name constraints)
	   )
	  )
	  (implementation
	   (value Int32
		(data  0)
	   )
	   (initValue Int32
		(data  0)
	   )
	  )
	 )
	 (component 13 CONSTANT
	  (name "1")
	  (interface
	   (output 1
		(name "Int32")
		(lock name constraints)
	   )
	  )
	  (implementation
	   (value Int32
		(data  1)
	   )
	   (initValue Int32
		(data  0)
	   )
	  )
	 )
	 (component 14 JUNCTION
	  (name "JCT")
	  (interface
	   (input 1
		(name "A")
		(lock name constraints)
	   )
	   (input 2
		(name "B")
		(lock name constraints)
	   )
	   (input 3
		(name "C")
		(optional yes)
	   )
	   (output 1
		(name "Data")
		(lock name constraints)
	   )
	  )
	 )
	 (component 15 FORMULA
	  (name "totSize(x)")
	  (interface
	   (input 1
		(name "X")
		(optional yes)
	   )
	   (output 1
		(name "Result")
		(lock name constraints)
	   )
	  )
	  (implementation
	   (expr 1 "totSize(x)")
	  )
	 )
	 (configuration
	  (connect D1:0 D0:0)
	  (connect I1:1 D2:1)
	  (connect D8:1 D2:2)
	  (connect D2:1 D3:1)
	  (connect D0:1 D3:2)
	  (connect D3:3 D4:1)
	  (connect D4:2 D5:0)
	  (connect D4:1 D6:0)
	  (connect D1:1 D7:1)
	  (connect D6:1 D7:2)
	  (connect D5:1 D7:3)
	  (connect D0:1 D8:1)
	  (connect D7:1 O1:1)
	 )
	)
	(viewFor 1
	 (active detail)
	 (detail
	  (geometry 89 121 847 435)
	  (configuration
	   (viewFor 0
		(active detail)
		(icon
		 (geometry 0 0 141 0)
		)
		(detail
		 (geometry 162 244 196 53)
		)
		(terminals on)
	   )
	   (viewFor 5
		(active icon)
		(icon
		 (geometry 258 172 24 16)
		)
		(detail
		 (geometry 488 275 84 30)
		 (showFormat int)
		)
	   )
	   (viewFor 7
		(active detail)
		(icon
		)
		(detail
		 (geometry 746 202 208 117)
		)
		(terminals on)
	   )
	   (viewFor 8
		(active detail)
		(icon
		)
		(detail
		 (geometry 208 455 214 70)
		)
		(terminals on)
	   )
	   (viewFor 10
		(active detail)
		(icon
	  )
		(detail
		 (geometry 572 474 106 53)
		)
		(terminals on)
	   )
	   (viewFor 12
		(active icon)
		(icon
		 (geometry 768 532 24 16)
		)
		(detail
		 (geometry 488 275 84 30)
		 (showFormat int)
		)
	   )
	   (viewFor 13
		(active icon)
		(icon
		 (geometry 808 472 24 16)
		)
		(detail
		 (geometry 678 605 84 30)
		 (showFormat int)
		)
	   )
	   (viewFor 14
		(active icon)
		(icon
		 (geometry 956 333 29 34)
		)
		(detail
		)
		(terminals on)
	   )
	   (viewFor 15
		(active detail)
		(icon
		)
		(detail
		 (geometry 474 284 92 32)
		)
		(terminals on)
	   )
	   (connect D1:0 D0:0
		(points 4 270 190 270 200 260 200 260 223)
	   )
	   (connect I1:1 D2:1
		(points 6 89 340 100 340 100 410 410 410 410 230 663 230)
	   )
	   (connect D8:1 D2:2
		(points 4 618 300 640 300 640 290 663 290)
	   )
	   (connect D2:1 D3:1
		(points 6 996 260 1020 260 1020 390 90 390 90 470 135 470)
	   )
	   (connect D0:1 D3:2
		(points 6 390 270 400 270 400 320 120 320 120 510 135 510)
	   )
	   (connect D3:3 D4:1
		(points 4 484 510 500 510 500 500 539 500)
	   )
	   (connect D4:2 D5:0
		(points 3 720 510 780 510 780 529)
	   )
	   (connect D4:1 D6:0
		(points 5 720 490 740 490 740 450 820 450 820 469)
	   )
	   (connect D1:1 D7:1
		(points 4 284 180 420 180 420 340 953 340)
	   )
	   (connect D6:1 D7:2
		(points 4 834 480 850 480 850 350 953 350)
	   )
	   (connect D5:1 D7:3
		(points 4 794 540 860 540 860 360 953 360)
	   )
	   (connect D0:1 D8:1
		(points 4 390 270 400 270 400 300 441 300)
	   )
	   (connect D7:1 O1:1
		(points 4 987 350 1010 350 1010 340 935 340)
	   )
	  )
	  (stackingOrder 7 0 1 2 3 8 4 6 5)
	 )
	 (terminals on)
	)
   )
  )
  (locked no)
  (trigMode deg)
  (nextID 20)
  (component 0 IMPORT
   (name "Import Library")
   (implementation
	(libType "DLL")
	(libName "myLibrary")
	(fileName "E:\\Projects\\Vee\\Keyboard\\KeyBoard.dll")
	(defnFileName "E:\\Projects\\Vee\\Keyboard\\vee.h")
   )
  )
  (component 1 CALL
   (name "Call myLibrary.recordKeyStrokes")
   (interface
	(output 1
	 (name "Ret Value")
	 (lock name constraints)
	 (optional yes)
	)
   )
   (implementation
	(callFunc "myLibrary.recordKeyStrokes")
	(parmMode "rev30")
   )
  )
  (component 8 CONFIRM25
   (name "Press a few keys...")
   (interface
	(output 1
	 (name "Go")
	 (lock name constraints)
	)
   )
   (implementation
	(component enterButton yes)
	(component escapeButton yes)
   )
  )
  (component 13 CONSTANT
   (name "Integer")
   (interface
	(output 1
	 (name "Int32")
	 (lock name constraints)
	)
   )
   (implementation
	(value Int32
	 (data  39)
	)
	(initValue Int32
	 (data  0)
	)
   )
  )
  (component 14 TEXTDISPLAY
   (interface
	(input 1
	 (name "Data")
	)
   )
   (implementation
   )
  )
  (component 15 CALL
   (name "Call BufferContains")
   (interface
	(input 1
	 (name "A")
	 (requires
	  (datatype Int32)
	  (shape "Scalar")
	 )
	 (optional yes)
	)
	(output 1
	 (name "X")
	 (lock name constraints)
	 (optional yes)
	)
   )
   (implementation
	(callFunc "BufferContains")
	(parmMode "rev30")
   )
  )
  (component 16 CALL
   (name "Call RetrieveStrokes")
   (interface
	(output 1
	 (name "X")
	 (lock name constraints)
	 (optional yes)
	)
   )
   (implementation
	(callFunc "RetrieveStrokes")
	(parmMode "rev30")
   )
  )
  (component 17 SCROLLINGTEXTDISPLAY
   (interface
	(input 1
	 (name "Data")
	)
   )
   (implementation
   )
  )
  (component 18 CONFIRM25
   (name "Press a few keys...")
   (interface
	(output 1
	 (name "Go")
	 (lock name constraints)
	)
   )
   (implementation
	(component enterButton yes)
	(component escapeButton yes)
   )
  )
  (component 19 DELETE
   (name "Delete Library")
   (implementation
	(libName "myLibrary")
   )
  )
  (configuration
   (connect D0:0 D1:0)
   (connect D1:0 D2:0)
   (connect D8:1 D3:0)
   (connect D5:1 D4:1)
   (connect D3:1 D5:1)
   (connect D2:1 D6:0)
   (connect D6:1 D7:1)
   (connect D7:0 D8:0)
   (connect D4:0 D9:0)
  )
 )
 (viewFor -1
  (active detail)
  (detail
   (geometry 0 28 659 634)
   (configuration
	(viewFor 0
	 (active icon)
	 (icon
	  (geometry 133 62 95 16)
	 )
	 (detail
	  (geometry 46 85 369 110)
	 )
	)
	(viewFor 1
	 (active icon)
	 (icon
	  (geometry 67 102 227 16)
	 )
	 (detail
	  (geometry 109 264 203 53)
	 )
	 (terminals on)
	)
	(viewFor 8
	 (active detail)
	 (icon
	   (geometry 0 0 129 0)
	  )
	 (detail
	  (geometry 77 150 207 20)
	 )
	 (title off)
	)
	(viewFor 13
	 (active detail)
	 (icon
	 )
	 (detail
	  (geometry 58 405 84 30)
	  (showFormat int)
	 )
	)
	(viewFor 14
	 (active detail)
	 (icon
	 )
	 (detail
	  (geometry 365 506 131 28)
	 )
	)
	(viewFor 15
	 (active detail)
	 (icon
	  (geometry 0 0 134 0)
	 )
	 (detail
	  (geometry 82 494 196 53)
	 )
	 (terminals on)
	)
	(viewFor 16
	 (active detail)
	 (icon
	   (geometry 0 0 134 0)
	  )
	 (detail
	  (geometry 92 224 196 53)
	 )
	 (terminals on)
	)
	(viewFor 17
	 (active detail)
	 (icon
	 )
	 (detail
	  (geometry 374 114 192 172)
	  (bufferSize 256)
	 )
	)
	(viewFor 18
	 (active detail)
	 (icon
	   (geometry 0 0 129 0)
	  )
	 (detail
	  (geometry 77 310 207 20)
	 )
	 (title off)
	)
	(viewFor 19
	 (active detail)
	 (icon
	 )
	 (detail
	  (geometry 94 604 193 32)
	 )
	)
	(connect D0:0 D1:0
	 (points 2 180 80 180 99)
	)
	(connect D1:0 D2:0
	 (points 2 180 120 180 147)
	)
	(connect D8:1 D3:0
	 (points 5 286 320 310 320 310 350 100 350 100 384)
	)
	(connect D5:1 D4:1
	 (points 2 310 520 362 520)
	)
	(connect D3:1 D5:1
	 (points 6 144 420 160 420 160 450 30 450 30 520 49 520)
	)
	(connect D2:1 D6:0
	 (points 5 286 160 300 160 300 180 190 180 190 203)
	)
	(connect D6:1 D7:1
	 (points 4 320 250 340 250 340 200 371 200)
	)
	(connect D7:0 D8:0
	 (points 6 470 288 470 310 350 310 350 300 180 300 180 307)
	)
	(connect D4:0 D9:0
	 (points 4 430 536 430 570 190 570 190 583)
	)
   )
   (stackingOrder 0 1 2 6 7 3 8 5 4 9)
  )
  (titleBg "Gray")
  (titleFg "Black")
  (numberFormats
   (realFormat standard)
   (realSigDigits 4)
   (realRadixSpec 4)
   (integerBase decimal)
  )
 )
)