Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
Comment: | Location service added |
---|---|
Timelines: | family | ancestors | descendants | both | trunk |
Files: | files | file ages | folders |
SHA1: |
6a0066556d27dc3f18e7be4c3774f789 |
User & Date: | bernd 2014-01-10 23:04:17.030 |
Context
2014-01-11
| ||
00:17 | negative .deg fixed check-in: fc5488ed40 user: bernd tags: trunk | |
2014-01-10
| ||
23:04 | Location service added check-in: 6a0066556d user: bernd tags: trunk | |
18:38 | Removed unused libraries check-in: 3e6683c6bb user: bernd tags: trunk | |
Changes
Changes to gles2/.libs/libsoil.so.
cannot compute difference between binary files
Changes to gles2/android.fs.
︙ | ︙ | |||
324 325 326 327 328 329 330 331 332 | ELSE drop getKeyCode keycode>keys unkeys THEN THEN THEN o> ; Defer android-touch ( event -- ) ' drop IS android-touch Defer android-location ( location -- ) | > > | | | 324 325 326 327 328 329 330 331 332 333 334 335 336 337 338 339 340 341 342 343 344 | ELSE drop getKeyCode keycode>keys unkeys THEN THEN THEN o> ; Defer android-touch ( event -- ) ' drop IS android-touch 0 Value location Defer android-location ( location -- ) :noname to location ; IS android-location :noname ( event type -- ) CASE 0 OF android-key ENDOF 1 OF android-touch ENDOF 2 OF android-location ENDOF nip ENDCASE ; is akey previous previous set-current |
Changes to gles2/jni-helper.fs.
1 2 3 4 5 6 | \ show/hide keyboard using jni tools require jni-tools.fs also android also jni | | > > | > > | 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 | \ show/hide keyboard using jni tools require jni-tools.fs also android also jni app activity @ ANativeActivity-clazz @ Value clazz : gforth-class: ( -- ) clazz env tuck JNIEnv-getObjectClass() to jniclass ; gforth-class: \ jni-sfield: INPUT_METHOD_SERVICE INPUT_METHOD_SERVICE Ljava/lang/String; \ jni-sfield: POWER_SERVICE POWER_SERVICE Ljava/lang/String; : INPUT_METHOD_SERVICE js" input_method" ; : POWER_SERVICE js" power" ; : LOCATION_SERVICE js" location" ; |
︙ | ︙ | |||
40 41 42 43 44 45 46 47 48 49 50 51 52 53 | jni-method: getUnicodeChar(I) getUnicodeChar (I)I jni-method: getUnicodeChar getUnicodeChar ()I jni-method: getKeyCode getKeyCode ()I jni-method: getCharacters getCharacters ()Ljava/lang/String; jni-method: getAction getAction ()I jni-method: isLongPress isLongPress ()Z : getUnicodeKey { event -- key } event AKeyEvent_getAction event AKeyEvent_getKeyCode newKeyEvent >o event AKeyEvent_getMetaState getUnicodeChar(I) o> ; Variable kbflag : togglekb ( -- ) | > > > > > | 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 | jni-method: getUnicodeChar(I) getUnicodeChar (I)I jni-method: getUnicodeChar getUnicodeChar ()I jni-method: getKeyCode getKeyCode ()I jni-method: getCharacters getCharacters ()Ljava/lang/String; jni-method: getAction getAction ()I jni-method: isLongPress isLongPress ()Z jni-class: java/util/List jni-method: l-get get (I)Ljava/lang/Object; jni-method: l-size size ()I : getUnicodeKey { event -- key } event AKeyEvent_getAction event AKeyEvent_getKeyCode newKeyEvent >o event AKeyEvent_getMetaState getUnicodeChar(I) o> ; Variable kbflag : togglekb ( -- ) |
︙ | ︙ |
Changes to gles2/jni-location.fs.
1 2 3 4 5 6 7 | \ location services also jni jni-class: android/location/Location jni-method: getAccuracy getAccuracy ()F | > > < | < | > > > > > > > > > > > > > > > > > > > > | > > > > > > > > > > > > > > > | 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 | \ location services require jni-helper.fs also jni jni-class: android/location/Location jni-method: getAccuracy getAccuracy ()F jni-method: getBearing getBearing ()F jni-method: getAltitude getAltitude ()D jni-method: getLatitude getLatitude ()D jni-method: getLongitude getLongitude ()D jni-method: getProvider getProvider ()Ljava/lang/String; jni-method: getSpeed getSpeed ()F jni-method: getTime getTime ()J jni-class: android/location/LocationManager jni-method: getAllProviders getAllProviders ()Ljava/util/List; jni-method: getProviders getProviders (Z)Ljava/util/List; jni-method: lm-getProvider getProvider (Ljava/lang/String;)Landroid/location/LocationProvider; jni-method: getLastKnownLocation getLastKnownLocation (Ljava/lang/String;)Landroid/location/Location; jni-class: android/os/Handler jni-method: post post (Ljava/lang/Runnable;)Z gforth-class: jni-field: gforth-handler handler Landroid/os/Handler; jni-field: startgps startgps Ljava/lang/Runnable; jni-field: stopgps stopgps Ljava/lang/Runnable; jni-method: setgps setgps (JF)V also android : start-gps ( -- ) clazz >o gforth-handler o> >o clazz >o startgps o> post o> ; : stop-gps ( -- ) clazz >o gforth-handler o> >o clazz >o stopgps o> post o> ; previous previous : .deg ( degree -- ) fdup floor fdup f>s 0 .r '°' xemit f- 60e f* fdup floor fdup f>s 0 .r ''' xemit f- 60e f* f. ; : .location ( -- ) location >o ." Lat: " getLatitude .deg cr ." Lon: " getLongitude .deg cr ." Alt: " getAltitude f. cr ." Spd: " getSpeed f. cr ." Dir: " getBearing f. cr ." Tme: " getTime d. cr ." Acc: " getAccuracy f. cr o> ; |
Changes to gles2/jni-media.fs.
︙ | ︙ | |||
99 100 101 102 103 104 105 | jni-static: cp-get(id) get (II)Landroid/media/CamcorderProfile; jni-class: android/hardware/Camera$Size jni-field: height height I jni-field: width width I | < < < < < | 99 100 101 102 103 104 105 106 107 108 109 110 111 | jni-static: cp-get(id) get (II)Landroid/media/CamcorderProfile; jni-class: android/hardware/Camera$Size jni-field: height height I jni-field: width width I previous 0 Value media-sft : create-sft ( -- ) media-sft ?EXIT media-tex current-tex new-SurfaceTexture to media-sft ; |
Changes to jni-location.fs.
1 2 3 4 5 6 7 | \ location services also jni jni-class: android/location/Location jni-method: getAccuracy getAccuracy ()F | > > < | < | > > > > > > > > > > > > > > > > > > > > | > > > > > > > > > > > > > > > | 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 | \ location services require jni-helper.fs also jni jni-class: android/location/Location jni-method: getAccuracy getAccuracy ()F jni-method: getBearing getBearing ()F jni-method: getAltitude getAltitude ()D jni-method: getLatitude getLatitude ()D jni-method: getLongitude getLongitude ()D jni-method: getProvider getProvider ()Ljava/lang/String; jni-method: getSpeed getSpeed ()F jni-method: getTime getTime ()J jni-class: android/location/LocationManager jni-method: getAllProviders getAllProviders ()Ljava/util/List; jni-method: getProviders getProviders (Z)Ljava/util/List; jni-method: lm-getProvider getProvider (Ljava/lang/String;)Landroid/location/LocationProvider; jni-method: getLastKnownLocation getLastKnownLocation (Ljava/lang/String;)Landroid/location/Location; jni-class: android/os/Handler jni-method: post post (Ljava/lang/Runnable;)Z gforth-class: jni-field: gforth-handler handler Landroid/os/Handler; jni-field: startgps startgps Ljava/lang/Runnable; jni-field: stopgps stopgps Ljava/lang/Runnable; jni-method: setgps setgps (JF)V also android : start-gps ( -- ) clazz >o gforth-handler o> >o clazz >o startgps o> post o> ; : stop-gps ( -- ) clazz >o gforth-handler o> >o clazz >o stopgps o> post o> ; previous previous : .deg ( degree -- ) fdup floor fdup f>s 0 .r '°' xemit f- 60e f* fdup floor fdup f>s 0 .r ''' xemit f- 60e f* f. ; : .location ( -- ) location >o ." Lat: " getLatitude .deg cr ." Lon: " getLongitude .deg cr ." Alt: " getAltitude f. cr ." Spd: " getSpeed f. cr ." Dir: " getBearing f. cr ." Tme: " getTime d. cr ." Acc: " getAccuracy f. cr o> ; |
Changes to jni-media.fs.
︙ | ︙ | |||
99 100 101 102 103 104 105 | jni-static: cp-get(id) get (II)Landroid/media/CamcorderProfile; jni-class: android/hardware/Camera$Size jni-field: height height I jni-field: width width I | < < < < < | 99 100 101 102 103 104 105 106 107 108 109 110 111 | jni-static: cp-get(id) get (II)Landroid/media/CamcorderProfile; jni-class: android/hardware/Camera$Size jni-field: height height I jni-field: width width I previous 0 Value media-sft : create-sft ( -- ) media-sft ?EXIT media-tex current-tex new-SurfaceTexture to media-sft ; |