/ (lgl-
/ 	Mark Williams C for the Atari ST Version 1.0
/ 	Copyright (c) 1984-1986 by Mark Williams Company, Chicago.
/ 	All rights reserved. May not be copied without permission.
/ -lgl)
	.globl	crystal_
	.globl	ctrl_cn_

	.prvi
/
/	For GEMAES calls from AESBIND.a or cryslib.o
/
crystal_:
	move.l	4(a7),d1
	move	$200,d0
	trap	$2
	rts

/
/	control array for vdibind
/
	.prvd
    	.even
ctrl_cn_:			 	/	Application Manager
	.byte	0, 1, 0			/ func 010		
    	.byte	2, 1, 1			/ func 011		
    	.byte	2, 1, 1 		/ func 012		
	.byte	0, 1, 1			/ func 013		
	.byte	2, 1, 1			/ func 014		
	.byte	1, 1, 1			/ func 015		
	.byte	0, 0, 0			/ func 016		
	.byte	0, 0, 0			/ func 017		
	.byte	0, 0, 0			/ func 008		
	.byte	0, 1, 0			/ func 019		
/							 Event Manager
	.byte	0, 1, 0			/ func 020		
	.byte	3, 5, 0			/ func 021		
	.byte	5, 5, 0			/ func 022		
	.byte	0, 1, 1			/ func 023		
	.byte	2, 1, 0			/ func 024		
	.byte	16, 7, 1 		/ func 025		
	.byte	2, 1, 0			/ func 026		
	.byte	0, 0, 0			/ func 027		
	.byte	0, 0, 0			/ func 028		
	.byte	0, 0, 0			/ func 009		
/							 Menu Manager
	.byte	1, 1, 1			/ func 030		
	.byte	2, 1, 1			/ func 031		
	.byte	2, 1, 1			/ func 032		
	.byte	2, 1, 1			/ func 033		
	.byte	1, 1, 2			/ func 034		
	.byte	1, 1, 1			/ func 005		
	.byte	0, 0, 0			/ func 006		
	.byte	0, 0, 0			/ func 007		
	.byte	0, 0, 0			/ func 008		
	.byte	0, 0, 0			/ func 009		
/							 Object Manager
	.byte	2, 1, 1			/ func 040		
	.byte	1, 1, 1			/ func 041		
  	.byte	6, 1, 1			/ func 042		
	.byte	4, 1, 1			/ func 043		
	.byte	1, 3, 1			/ func 044		
	.byte	2, 1, 1			/ func 045		
	.byte	4, 2, 1			/ func 046		
	.byte	8, 1, 1			/ func 047		
	.byte	0, 0, 0			/ func 048		
	.byte	0, 0, 0			/ func 049		
/							 Form Manager
	.byte	1, 1, 1			/ func 050		
	.byte	9, 1, 1			/ func 051		
	.byte	1, 1, 1			/ func 002		
	.byte	1, 1, 0			/ func 003		
	.byte	0, 5, 1			/ func 004		
	.byte	0, 0, 0			/ func 005		
	.byte	0, 0, 0			/ func 006		
	.byte	0, 0, 0			/ func 007		
	.byte	0, 0, 0			/ func 008		
	.byte	0, 0, 0			/ func 009		
/							 Dialog Manager
	.byte	0, 0, 0			/ func 060		
	.byte	0, 0, 0			/ func 061		
	.byte	0, 0, 0			/ func 062		
	.byte	0, 0, 0			/ func 003		
	.byte	0, 0, 0			/ func 004		
	.byte	0, 0, 0			/ func 005		
	.byte	0, 0, 0			/ func 006		
	.byte	0, 0, 0			/ func 007		
	.byte	0, 0, 0			/ func 008		
	.byte	0, 0, 0			/ func 009		
/							Graphics Manager
	.byte	4, 3, 0			/ func 070		
	.byte	8, 3, 0			/ func 071		
	.byte	6, 1, 0			/ func 072		
	.byte	8, 1, 0			/ func 073		
	.byte	8, 1, 0			/ func 074		
	.byte	4, 1, 1			/ func 075		
	.byte	3, 1, 1			/ func 076		
	.byte	0, 5, 0			/ func 077		
	.byte	1, 1, 1			/ func 078		
	.byte	0, 5, 0			/ func 009		
/							Scrap Manager
	.byte	0, 1, 1			/ func 080		
	.byte	0, 1, 1			/ func 081		
	.byte	0, 0, 0			/ func 082		
	.byte	0, 0, 0			/ func 083		
	.byte	0, 0, 0			/ func 084		
	.byte	0, 0, 0			/ func 005		
	.byte	0, 0, 0			/ func 006		
	.byte	0, 0, 0			/ func 007		
	.byte	0, 0, 0			/ func 008		
	.byte	0, 0, 0			/ func 009		
/							fseler Manager
	.byte	0, 2, 2			/ func 090		
	.byte	0, 0, 0			/ func 091		
	.byte	0, 0, 0			/ func 092		
	.byte	0, 0, 0			/ func 003		
	.byte	0, 0, 0			/ func 004		
	.byte	0, 0, 0			/ func 005		
	.byte	0, 0, 0			/ func 006		
	.byte	0, 0, 0			/ func 007		
	.byte	0, 0, 0			/ func 008		
	.byte	0, 0, 0 		/ func 009		
/							Window Manager
	.byte	5, 1, 0			/ func 100		
	.byte	5, 1, 0			/ func 101		
	.byte	1, 1, 0			/ func 102		
	.byte	1, 1, 0			/ func 103		
	.byte	2, 5, 0			/ func 104		
	.byte	6, 1, 0			/ func 105		
	.byte	2, 1, 0			/ func 106		
	.byte	1, 1, 0			/ func 107		
	.byte	6, 5, 0			/ func 108		
	.byte	0, 0, 0 		/ func 009		
/							Resource Manger
	.byte	0, 1, 1			/ func 110		
	.byte	0, 1, 0			/ func 111		
	.byte	2, 1, 0			/ func 112		
	.byte	2, 1, 1			/ func 113		
	.byte	1, 1, 1			/ func 114		
	.byte	0, 0, 0			/ func 115		
	.byte	0, 0, 0			/ func 006
	.byte	0, 0, 0			/ func 007
	.byte	0, 0, 0			/ func 008
	.byte	0, 0, 0			/ func 009
/							Shell Manager
	.byte	0, 1, 2			/ func 120
	.byte	3, 1, 2			/ func 121
	.byte	1, 1, 1			/ func 122
	.byte	1, 1, 1			/ func 123
	.byte	0, 1, 1			/ func 124
	.byte	0, 1, 2			/ func 125