Changeset 443 for trunk

Timestamp:

07/12/08 20:01:37 (5 years ago)

Author:

EWAVR

Message:

+ sx100is: added "wheel_left" and "wheel_right" ubasic commands

Location:

trunk

Files:

• lib/ubasic/ubasic.c (modified) (2 diffs)
• platform/sx100is/sub/100c/lib.c (modified) (2 diffs)
• platform/sx100is/sub/100c/stubs_entry_2.S (modified) (1 diff)

trunk/lib/ubasic/ubasic.c

@@ -1401 +1401 @@
 static void wheel_left_statement(void){
   accept(TOKENIZER_WHEEL_LEFT);
-#if defined (CAMERA_g7)
+#if defined (CAMERA_g7) || defined (CAMERA_sx100is)
   JogDial_CCW();
 #endif
@@ -1410 +1410 @@
 static void wheel_right_statement(void){
   accept(TOKENIZER_WHEEL_RIGHT);
-#if defined (CAMERA_g7)
+#if defined (CAMERA_g7) || defined (CAMERA_sx100is)
   JogDial_CW();
 #endif
   accept_cr();
 }
+
+
 static void shutdown_statement(void){
   accept(TOKENIZER_SHUT_DOWN);

trunk/platform/sx100is/sub/100c/lib.c

@@ -1 +1 @@
 #include "platform.h"
+#include "lolevel.h"
 
 //NOTE These functions not used
@@ -79 +80 @@
 
 long vid_get_bitmap_buffer_height() { return 240; }
+
+void JogDial_CW(void){
+  (*(short*)(0x2590+2))--;
+  *(int*)(0x2590+0x18)=0x32;
+  _GiveSemaphore(*(int*)(0x2590+0x10));
+}
+
+void JogDial_CCW(void){
+  (*(short*)(0x2590+2))++;
+  *(int*)(0x2590+0x18)=0x32;
+  _GiveSemaphore(*(int*)(0x2590+0x10));
+}

trunk/platform/sx100is/sub/100c/stubs_entry_2.S

@@ -119 +119 @@
 NHSTUB(MakeAFScan,  0xFFDEFB6C) 
 
-
+NHSTUB(GiveSemaphore,  0xFFC0BB24)
 
 // dryos Test