Initial commit

.gitattributes

@@ -0,0 +1 @@
+*.pbxproj -crlf -diff -merge

.gitignore

@@ -0,0 +1,11 @@
+# xcode noise
+build/*
+*.pbxuser
+*.mode1v3
+
+# old skool
+.svn
+
+# osx noise
+.DS_Store
+profile

F-Script/FSDemoAssistant.h

@@ -0,0 +1,33 @@
+/* FSDemoController.h Copyright (c) 2007 Philippe Mougin.  */
+/*   This software is open source. See the license.  */ 
+
+#import <Cocoa/Cocoa.h>
+#import "FSInterpreterView.h"
+
+
+@interface FSDemoAssistant : NSObject 
+{
+  IBOutlet FSInterpreterView *interpreterView;
+  NSTextView *loadImage;
+  NSTextView *displayImage;
+  NSTextView *lockFocus;
+  NSTextView *perspective;
+  NSTextView *hueAdjust;
+  NSTextView *bump;
+  NSTextView *bumpAnimate;
+} 
+
+@property (retain) IBOutlet NSTextView *loadImage;
+@property (retain) IBOutlet NSTextView *displayImage;
+@property (retain) IBOutlet NSTextView *lockFocus;
+@property (retain) IBOutlet NSTextView *perspective;
+@property (retain) IBOutlet NSTextView *hueAdjust;
+@property (retain) IBOutlet NSTextView *bump;
+@property (retain) IBOutlet NSTextView *bumpAnimate;
+
+- (void)activate;
+- (id)initWithInterpreterView:(FSInterpreterView *)theInterpreterView;
+- (IBAction)loadCode:sender;
+- (void)putCommand:(NSString *)command;
+
+@end

F-Script/FSDemoAssistant.m

@@ -0,0 +1,65 @@
+/* FSDemoController.m Copyright (c) 2007 Philippe Mougin.  */
+/*   This software is open source. See the license.  */ 
+
+#import "FSDemoAssistant.h"
+#import "FSNSString.h"
+
+
+@implementation FSDemoAssistant
+
+@synthesize loadImage;
+@synthesize displayImage;
+@synthesize lockFocus;
+@synthesize perspective;
+@synthesize hueAdjust;
+@synthesize bump;
+@synthesize bumpAnimate;
+
+- (void)activate
+{
+  if (![NSBundle loadNibNamed:@"DemoAssistant" owner:self])  
+  {
+    NSLog(@"Failed to load DemoAssistant nib file");
+    NSBeep();
+    return; 
+  }
+}
+
+- (void) dealloc
+{
+  [interpreterView release];
+  [super dealloc];
+}
+
+- (id)initWithInterpreterView:(FSInterpreterView *)theInterpreterView
+{
+  self = [super init];
+  if (self != nil) 
+  {
+    interpreterView = [theInterpreterView retain];
+  }
+  return self;
+}
+
+
+
+- (IBAction)loadCode:sender
+{
+  [self putCommand:[[self performSelector:NSSelectorFromString([sender title])] string]];
+}
+
+- (void)putCommand:(NSString *)command
+{
+  NSArray *fragments = [command componentsSeparatedByString:@" "];
+
+  for (unsigned int i = 0, n = [fragments count]; i < n; i++)
+  {
+    [interpreterView putCommand:[fragments objectAtIndex:i]];
+    [interpreterView putCommand:@" "];
+	[interpreterView display];
+    [NSThread sleepUntilDate:[NSDate dateWithTimeIntervalSinceNow:0.05]];
+  }
+  [[interpreterView window] makeKeyWindow];
+}
+
+@end