Initial Comit

This commit is contained in:
2021-12-19 10:56:25 +01:00
commit b8c9c75cf8
2351 changed files with 1819654 additions and 0 deletions

File diff suppressed because it is too large Load Diff

View File

@@ -0,0 +1,72 @@
package shub.dpm;
import java.io.IOException;
import anywheresoftware.b4a.BA;
import anywheresoftware.b4a.pc.PCBA;
import anywheresoftware.b4a.pc.RDebug;
import anywheresoftware.b4a.pc.RemoteObject;
import anywheresoftware.b4a.pc.RDebug.IRemote;
import anywheresoftware.b4a.pc.Debug;
import anywheresoftware.b4a.pc.B4XTypes.B4XClass;
import anywheresoftware.b4a.pc.B4XTypes.DeviceClass;
public class about implements IRemote{
public static about mostCurrent;
public static RemoteObject processBA;
public static boolean processGlobalsRun;
public static RemoteObject myClass;
public static RemoteObject remoteMe;
public about() {
mostCurrent = this;
}
public RemoteObject getRemoteMe() {
return remoteMe;
}
public static void main (String[] args) throws Exception {
new RDebug(args[0], Integer.parseInt(args[1]), Integer.parseInt(args[2]), args[3]);
RDebug.INSTANCE.waitForTask();
}
static {
anywheresoftware.b4a.pc.RapidSub.moduleToObject.put(new B4XClass("about"), "shub.dpm.about");
}
public boolean isSingleton() {
return true;
}
public static RemoteObject getObject() {
return myClass;
}
public RemoteObject activityBA;
public RemoteObject _activity;
private PCBA pcBA;
public PCBA create(Object[] args) throws ClassNotFoundException{
processBA = (RemoteObject) args[1];
activityBA = (RemoteObject) args[2];
_activity = (RemoteObject) args[3];
anywheresoftware.b4a.keywords.Common.Density = (Float)args[4];
remoteMe = (RemoteObject) args[5];
pcBA = new PCBA(this, about.class);
main_subs_0.initializeProcessGlobals();
return pcBA;
}
public static RemoteObject __c = RemoteObject.declareNull("anywheresoftware.b4a.keywords.Common");
public static RemoteObject _imageview1 = RemoteObject.declareNull("anywheresoftware.b4a.objects.ImageViewWrapper");
public static RemoteObject _label5 = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper");
public static RemoteObject _dateutils = RemoteObject.declareNull("b4a.example.dateutils");
public static shub.dpm.main _main = null;
public static shub.dpm.listdata _listdata = null;
public static shub.dpm.param _param = null;
public static shub.dpm.starter _starter = null;
public static shub.dpm.tempdata _tempdata = null;
public static shub.dpm.appmain _appmain = null;
public static shub.dpm.httputils2service _httputils2service = null;
public static shub.dpm.xuiviewsutils _xuiviewsutils = null;
public Object[] GetGlobals() {
return new Object[] {"Activity",about.mostCurrent._activity,"AppMain",Debug.moduleToString(shub.dpm.appmain.class),"DateUtils",about.mostCurrent._dateutils,"HttpUtils2Service",Debug.moduleToString(shub.dpm.httputils2service.class),"ImageView1",about.mostCurrent._imageview1,"Label5",about.mostCurrent._label5,"ListData",Debug.moduleToString(shub.dpm.listdata.class),"Main",Debug.moduleToString(shub.dpm.main.class),"Param",Debug.moduleToString(shub.dpm.param.class),"Starter",Debug.moduleToString(shub.dpm.starter.class),"TempData",Debug.moduleToString(shub.dpm.tempdata.class),"XUIViewsUtils",Debug.moduleToString(shub.dpm.xuiviewsutils.class)};
}
}

View File

@@ -0,0 +1,117 @@
package shub.dpm;
import anywheresoftware.b4a.BA;
import anywheresoftware.b4a.pc.*;
public class about_subs_0 {
public static RemoteObject _activity_create(RemoteObject _firsttime) throws Exception{
try {
Debug.PushSubsStack("Activity_Create (about) ","about",5,about.mostCurrent.activityBA,about.mostCurrent,20);
if (RapidSub.canDelegate("activity_create")) { return shub.dpm.about.remoteMe.runUserSub(false, "about","activity_create", _firsttime);}
RemoteObject _any = RemoteObject.declareNull("anywheresoftware.b4a.objects.AnimationWrapper");
Debug.locals.put("FirstTime", _firsttime);
BA.debugLineNum = 20;BA.debugLine="Sub Activity_Create(FirstTime As Boolean)";
Debug.ShouldStop(524288);
BA.debugLineNum = 23;BA.debugLine="Activity.LoadLayout(\"About\")";
Debug.ShouldStop(4194304);
about.mostCurrent._activity.runMethodAndSync(false,"LoadLayout",(Object)(RemoteObject.createImmutable("About")),about.mostCurrent.activityBA);
BA.debugLineNum = 24;BA.debugLine="Activity.Title=\"Über...\"";
Debug.ShouldStop(8388608);
about.mostCurrent._activity.runMethod(false,"setTitle",BA.ObjectToCharSequence("Über..."));
BA.debugLineNum = 25;BA.debugLine="Label5.text=Chr(0x00A9)& \"2021 - Stefan Hutter Un";
Debug.ShouldStop(16777216);
about.mostCurrent._label5.runMethod(true,"setText",BA.ObjectToCharSequence(RemoteObject.concat(about.mostCurrent.__c.runMethod(true,"Chr",(Object)(BA.numberCast(int.class, 0x00a9))),RemoteObject.createImmutable("2021 - Stefan Hutter Unternehmensberatung"))));
BA.debugLineNum = 26;BA.debugLine="Dim Any As Animation";
Debug.ShouldStop(33554432);
_any = RemoteObject.createNew ("anywheresoftware.b4a.objects.AnimationWrapper");Debug.locals.put("Any", _any);
BA.debugLineNum = 28;BA.debugLine="Any.InitializeRotateCenter(\"\",360,0,ImageView1)";
Debug.ShouldStop(134217728);
_any.runVoidMethod ("InitializeRotateCenter",about.mostCurrent.activityBA,(Object)(BA.ObjectToString("")),(Object)(BA.numberCast(float.class, 360)),(Object)(BA.numberCast(float.class, 0)),(Object)((about.mostCurrent._imageview1.getObject())));
BA.debugLineNum = 29;BA.debugLine="Any.Duration=3000";
Debug.ShouldStop(268435456);
_any.runMethod(true,"setDuration",BA.numberCast(long.class, 3000));
BA.debugLineNum = 30;BA.debugLine="ImageView1.Tag=Any";
Debug.ShouldStop(536870912);
about.mostCurrent._imageview1.runMethod(false,"setTag",(_any.getObject()));
BA.debugLineNum = 31;BA.debugLine="Any.Start(ImageView1)";
Debug.ShouldStop(1073741824);
_any.runVoidMethod ("Start",(Object)((about.mostCurrent._imageview1.getObject())));
BA.debugLineNum = 32;BA.debugLine="End Sub";
Debug.ShouldStop(-2147483648);
return RemoteObject.createImmutable("");
}
catch (Exception e) {
throw Debug.ErrorCaught(e);
}
finally {
Debug.PopSubsStack();
}}
public static RemoteObject _activity_pause(RemoteObject _userclosed) throws Exception{
try {
Debug.PushSubsStack("Activity_Pause (about) ","about",5,about.mostCurrent.activityBA,about.mostCurrent,38);
if (RapidSub.canDelegate("activity_pause")) { return shub.dpm.about.remoteMe.runUserSub(false, "about","activity_pause", _userclosed);}
Debug.locals.put("UserClosed", _userclosed);
BA.debugLineNum = 38;BA.debugLine="Sub Activity_Pause (UserClosed As Boolean)";
Debug.ShouldStop(32);
BA.debugLineNum = 40;BA.debugLine="End Sub";
Debug.ShouldStop(128);
return RemoteObject.createImmutable("");
}
catch (Exception e) {
throw Debug.ErrorCaught(e);
}
finally {
Debug.PopSubsStack();
}}
public static RemoteObject _activity_resume() throws Exception{
try {
Debug.PushSubsStack("Activity_Resume (about) ","about",5,about.mostCurrent.activityBA,about.mostCurrent,34);
if (RapidSub.canDelegate("activity_resume")) { return shub.dpm.about.remoteMe.runUserSub(false, "about","activity_resume");}
BA.debugLineNum = 34;BA.debugLine="Sub Activity_Resume";
Debug.ShouldStop(2);
BA.debugLineNum = 36;BA.debugLine="End Sub";
Debug.ShouldStop(8);
return RemoteObject.createImmutable("");
}
catch (Exception e) {
throw Debug.ErrorCaught(e);
}
finally {
Debug.PopSubsStack();
}}
public static RemoteObject _button3_click() throws Exception{
try {
Debug.PushSubsStack("Button3_Click (about) ","about",5,about.mostCurrent.activityBA,about.mostCurrent,43);
if (RapidSub.canDelegate("button3_click")) { return shub.dpm.about.remoteMe.runUserSub(false, "about","button3_click");}
BA.debugLineNum = 43;BA.debugLine="Private Sub Button3_Click";
Debug.ShouldStop(1024);
BA.debugLineNum = 44;BA.debugLine="Activity.Finish";
Debug.ShouldStop(2048);
about.mostCurrent._activity.runVoidMethod ("Finish");
BA.debugLineNum = 45;BA.debugLine="End Sub";
Debug.ShouldStop(4096);
return RemoteObject.createImmutable("");
}
catch (Exception e) {
throw Debug.ErrorCaught(e);
}
finally {
Debug.PopSubsStack();
}}
public static RemoteObject _globals() throws Exception{
//BA.debugLineNum = 12;BA.debugLine="Sub Globals";
//BA.debugLineNum = 16;BA.debugLine="Private ImageView1 As ImageView";
about.mostCurrent._imageview1 = RemoteObject.createNew ("anywheresoftware.b4a.objects.ImageViewWrapper");
//BA.debugLineNum = 17;BA.debugLine="Private Label5 As Label";
about.mostCurrent._label5 = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");
//BA.debugLineNum = 18;BA.debugLine="End Sub";
return RemoteObject.createImmutable("");
}
public static RemoteObject _process_globals() throws Exception{
//BA.debugLineNum = 6;BA.debugLine="Sub Process_Globals";
//BA.debugLineNum = 10;BA.debugLine="End Sub";
return RemoteObject.createImmutable("");
}
}

View File

@@ -0,0 +1,41 @@
package shub.dpm;
import anywheresoftware.b4a.pc.PCBA;
import anywheresoftware.b4a.pc.RemoteObject;
public class animatedcounter {
public static RemoteObject myClass;
public animatedcounter() {
}
public static PCBA staticBA = new PCBA(null, animatedcounter.class);
public static RemoteObject __c = RemoteObject.declareNull("anywheresoftware.b4a.keywords.Common");
public static RemoteObject _meventname = RemoteObject.createImmutable("");
public static RemoteObject _mcallback = RemoteObject.declareNull("Object");
public static RemoteObject _mbase = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper");
public static RemoteObject _xui = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper.XUI");
public static RemoteObject _imageviews = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.List");
public static RemoteObject _mdigits = RemoteObject.createImmutable(0);
public static RemoteObject _lbltemplate = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper");
public static RemoteObject _mvalue = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.List");
public static RemoteObject _digitheight = RemoteObject.createImmutable(0);
public static RemoteObject _digitwidth = RemoteObject.createImmutable(0);
public static RemoteObject _mduration = RemoteObject.createImmutable(0);
public static RemoteObject _fade = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper");
public static RemoteObject _xfadeiv = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper");
public static RemoteObject _tag = RemoteObject.declareNull("Object");
public static RemoteObject _dateutils = RemoteObject.declareNull("b4a.example.dateutils");
public static shub.dpm.main _main = null;
public static shub.dpm.listdata _listdata = null;
public static shub.dpm.param _param = null;
public static shub.dpm.starter _starter = null;
public static shub.dpm.tempdata _tempdata = null;
public static shub.dpm.about _about = null;
public static shub.dpm.appmain _appmain = null;
public static shub.dpm.httputils2service _httputils2service = null;
public static shub.dpm.xuiviewsutils _xuiviewsutils = null;
public static Object[] GetGlobals(RemoteObject _ref) throws Exception {
return new Object[] {"DateUtils",_ref.getField(false, "_dateutils"),"DigitHeight",_ref.getField(false, "_digitheight"),"DigitWidth",_ref.getField(false, "_digitwidth"),"fade",_ref.getField(false, "_fade"),"ImageViews",_ref.getField(false, "_imageviews"),"lblTemplate",_ref.getField(false, "_lbltemplate"),"mBase",_ref.getField(false, "_mbase"),"mCallBack",_ref.getField(false, "_mcallback"),"mdigits",_ref.getField(false, "_mdigits"),"mDuration",_ref.getField(false, "_mduration"),"mEventName",_ref.getField(false, "_meventname"),"mValue",_ref.getField(false, "_mvalue"),"Tag",_ref.getField(false, "_tag"),"xfadeIv",_ref.getField(false, "_xfadeiv"),"xui",_ref.getField(false, "_xui")};
}
}

View File

@@ -0,0 +1,471 @@
package shub.dpm;
import anywheresoftware.b4a.BA;
import anywheresoftware.b4a.pc.*;
public class animatedcounter_subs_0 {
public static RemoteObject _base_resize(RemoteObject __ref,RemoteObject _width,RemoteObject _height) throws Exception{
try {
Debug.PushSubsStack("Base_Resize (animatedcounter) ","animatedcounter",9,__ref.getField(false, "ba"),__ref,70);
if (RapidSub.canDelegate("base_resize")) { return __ref.runUserSub(false, "animatedcounter","base_resize", __ref, _width, _height);}
RemoteObject _columns = RemoteObject.createImmutable(0);
RemoteObject _bmp = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper");
RemoteObject _left = RemoteObject.createImmutable(0);
int _i = 0;
RemoteObject _iv = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper");
Debug.locals.put("Width", _width);
Debug.locals.put("Height", _height);
BA.debugLineNum = 70;BA.debugLine="Private Sub Base_Resize (Width As Double, Height A";
Debug.JustUpdateDeviceLine();
BA.debugLineNum = 71;BA.debugLine="mBase.GetView(0).SetLayoutAnimated(0, 0, 0, Width";
Debug.JustUpdateDeviceLine();
__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(false,"GetView",(Object)(BA.numberCast(int.class, 0))).runVoidMethod ("SetLayoutAnimated",(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, _width)),(Object)(BA.numberCast(int.class, _height)));
BA.debugLineNum = 72;BA.debugLine="xfadeIv.SetLayoutAnimated(0, 0, 0, Width, Height)";
Debug.JustUpdateDeviceLine();
__ref.getField(false,"_xfadeiv" /*RemoteObject*/ ).runVoidMethod ("SetLayoutAnimated",(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, _width)),(Object)(BA.numberCast(int.class, _height)));
BA.debugLineNum = 73;BA.debugLine="xfadeIv.SetBitmap(fade.Resize(Width, Height, Fals";
Debug.JustUpdateDeviceLine();
__ref.getField(false,"_xfadeiv" /*RemoteObject*/ ).runVoidMethod ("SetBitmap",(Object)((__ref.getField(false,"_fade" /*RemoteObject*/ ).runMethod(false,"Resize",(Object)(BA.numberCast(int.class, _width)),(Object)(BA.numberCast(int.class, _height)),(Object)(animatedcounter.__c.getField(true,"False"))).getObject())));
BA.debugLineNum = 74;BA.debugLine="DigitHeight = Height";
Debug.JustUpdateDeviceLine();
__ref.setField ("_digitheight" /*RemoteObject*/ ,BA.numberCast(int.class, _height));
BA.debugLineNum = 75;BA.debugLine="Dim Columns As Int = mdigits";
Debug.JustUpdateDeviceLine();
_columns = __ref.getField(true,"_mdigits" /*RemoteObject*/ );Debug.locals.put("Columns", _columns);Debug.locals.put("Columns", _columns);
BA.debugLineNum = 76;BA.debugLine="DigitWidth = Width / Columns";
Debug.JustUpdateDeviceLine();
__ref.setField ("_digitwidth" /*RemoteObject*/ ,BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {_width,_columns}, "/",0, 0)));
BA.debugLineNum = 77;BA.debugLine="Dim bmp As B4XBitmap = CreateBitmap(lblTemplate)";
Debug.JustUpdateDeviceLine();
_bmp = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper");
_bmp = __ref.runClassMethod (shub.dpm.animatedcounter.class, "_createbitmap" /*RemoteObject*/ ,(Object)(__ref.getField(false,"_lbltemplate" /*RemoteObject*/ )));Debug.locals.put("bmp", _bmp);Debug.locals.put("bmp", _bmp);
BA.debugLineNum = 78;BA.debugLine="Dim left As Int = Width";
Debug.JustUpdateDeviceLine();
_left = BA.numberCast(int.class, _width);Debug.locals.put("left", _left);Debug.locals.put("left", _left);
BA.debugLineNum = 79;BA.debugLine="For i = 0 To ImageViews.Size - 1";
Debug.JustUpdateDeviceLine();
{
final int step9 = 1;
final int limit9 = RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_imageviews" /*RemoteObject*/ ).runMethod(true,"getSize"),RemoteObject.createImmutable(1)}, "-",1, 1).<Integer>get().intValue();
_i = 0 ;
for (;(step9 > 0 && _i <= limit9) || (step9 < 0 && _i >= limit9) ;_i = ((int)(0 + _i + step9)) ) {
Debug.locals.put("i", _i);
BA.debugLineNum = 80;BA.debugLine="Dim iv As B4XView = ImageViews.Get(i)";
Debug.JustUpdateDeviceLine();
_iv = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");
_iv = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.B4XViewWrapper"), __ref.getField(false,"_imageviews" /*RemoteObject*/ ).runMethod(false,"Get",(Object)(BA.numberCast(int.class, _i))));Debug.locals.put("iv", _iv);
BA.debugLineNum = 82;BA.debugLine="left = left - DigitWidth";
Debug.JustUpdateDeviceLine();
_left = RemoteObject.solve(new RemoteObject[] {_left,__ref.getField(true,"_digitwidth" /*RemoteObject*/ )}, "-",1, 1);Debug.locals.put("left", _left);
BA.debugLineNum = 83;BA.debugLine="iv.SetLayoutAnimated(0, left, TopFromValue(i), D";
Debug.JustUpdateDeviceLine();
_iv.runVoidMethod ("SetLayoutAnimated",(Object)(BA.numberCast(int.class, 0)),(Object)(_left),(Object)(__ref.runClassMethod (shub.dpm.animatedcounter.class, "_topfromvalue" /*RemoteObject*/ ,(Object)(BA.numberCast(int.class, _i)))),(Object)(__ref.getField(true,"_digitwidth" /*RemoteObject*/ )),(Object)(RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_digitheight" /*RemoteObject*/ ),RemoteObject.createImmutable(10)}, "*",0, 1)));
BA.debugLineNum = 84;BA.debugLine="iv.SetBitmap(bmp)";
Debug.JustUpdateDeviceLine();
_iv.runVoidMethod ("SetBitmap",(Object)((_bmp.getObject())));
}
}Debug.locals.put("i", _i);
;
BA.debugLineNum = 86;BA.debugLine="End Sub";
Debug.JustUpdateDeviceLine();
return RemoteObject.createImmutable("");
}
catch (Exception e) {
throw Debug.ErrorCaught(e);
}
finally {
Debug.PopSubsStack();
}}
public static RemoteObject _class_globals(RemoteObject __ref) throws Exception{
//BA.debugLineNum = 5;BA.debugLine="Sub Class_Globals";
//BA.debugLineNum = 6;BA.debugLine="Private mEventName As String 'ignore";
animatedcounter._meventname = RemoteObject.createImmutable("");__ref.setField("_meventname",animatedcounter._meventname);
//BA.debugLineNum = 7;BA.debugLine="Private mCallBack As Object 'ignore";
animatedcounter._mcallback = RemoteObject.createNew ("Object");__ref.setField("_mcallback",animatedcounter._mcallback);
//BA.debugLineNum = 8;BA.debugLine="Public mBase As B4XView 'ignore";
animatedcounter._mbase = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_mbase",animatedcounter._mbase);
//BA.debugLineNum = 9;BA.debugLine="Private xui As XUI 'ignore";
animatedcounter._xui = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper.XUI");__ref.setField("_xui",animatedcounter._xui);
//BA.debugLineNum = 10;BA.debugLine="Private ImageViews As List";
animatedcounter._imageviews = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.List");__ref.setField("_imageviews",animatedcounter._imageviews);
//BA.debugLineNum = 11;BA.debugLine="Private mdigits As Int";
animatedcounter._mdigits = RemoteObject.createImmutable(0);__ref.setField("_mdigits",animatedcounter._mdigits);
//BA.debugLineNum = 12;BA.debugLine="Private lblTemplate As B4XView";
animatedcounter._lbltemplate = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_lbltemplate",animatedcounter._lbltemplate);
//BA.debugLineNum = 13;BA.debugLine="Private mValue As List";
animatedcounter._mvalue = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.List");__ref.setField("_mvalue",animatedcounter._mvalue);
//BA.debugLineNum = 14;BA.debugLine="Private DigitHeight, DigitWidth As Int";
animatedcounter._digitheight = RemoteObject.createImmutable(0);__ref.setField("_digitheight",animatedcounter._digitheight);
animatedcounter._digitwidth = RemoteObject.createImmutable(0);__ref.setField("_digitwidth",animatedcounter._digitwidth);
//BA.debugLineNum = 15;BA.debugLine="Private mDuration As Int";
animatedcounter._mduration = RemoteObject.createImmutable(0);__ref.setField("_mduration",animatedcounter._mduration);
//BA.debugLineNum = 16;BA.debugLine="Private fade As B4XBitmap";
animatedcounter._fade = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper");__ref.setField("_fade",animatedcounter._fade);
//BA.debugLineNum = 17;BA.debugLine="Private xfadeIv As B4XView";
animatedcounter._xfadeiv = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_xfadeiv",animatedcounter._xfadeiv);
//BA.debugLineNum = 18;BA.debugLine="Public Tag As Object";
animatedcounter._tag = RemoteObject.createNew ("Object");__ref.setField("_tag",animatedcounter._tag);
//BA.debugLineNum = 20;BA.debugLine="End Sub";
return RemoteObject.createImmutable("");
}
public static RemoteObject _createbitmap(RemoteObject __ref,RemoteObject _lbl) throws Exception{
try {
Debug.PushSubsStack("CreateBitmap (animatedcounter) ","animatedcounter",9,__ref.getField(false, "ba"),__ref,93);
if (RapidSub.canDelegate("createbitmap")) { return __ref.runUserSub(false, "animatedcounter","createbitmap", __ref, _lbl);}
RemoteObject _p = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper");
RemoteObject _cvs = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XCanvas");
RemoteObject _r = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XCanvas.B4XRect");
RemoteObject _baseline = RemoteObject.createImmutable(0);
int _i = 0;
RemoteObject _res = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper");
Debug.locals.put("lbl", _lbl);
BA.debugLineNum = 93;BA.debugLine="Private Sub CreateBitmap (lbl As B4XView) As B4XBi";
Debug.JustUpdateDeviceLine();
BA.debugLineNum = 94;BA.debugLine="Dim p As B4XView = xui.CreatePanel(\"\")";
Debug.JustUpdateDeviceLine();
_p = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");
_p = __ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(false,"CreatePanel",__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("")));Debug.locals.put("p", _p);Debug.locals.put("p", _p);
BA.debugLineNum = 95;BA.debugLine="p.SetLayoutAnimated(0, 0, 0, DigitWidth, DigitHei";
Debug.JustUpdateDeviceLine();
_p.runVoidMethod ("SetLayoutAnimated",(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(__ref.getField(true,"_digitwidth" /*RemoteObject*/ )),(Object)(RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_digitheight" /*RemoteObject*/ ),RemoteObject.createImmutable(10)}, "*",0, 1)));
BA.debugLineNum = 96;BA.debugLine="Dim cvs As B4XCanvas";
Debug.JustUpdateDeviceLine();
_cvs = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XCanvas");Debug.locals.put("cvs", _cvs);
BA.debugLineNum = 97;BA.debugLine="cvs.Initialize(p)";
Debug.JustUpdateDeviceLine();
_cvs.runVoidMethod ("Initialize",(Object)(_p));
BA.debugLineNum = 98;BA.debugLine="Dim r As B4XRect = cvs.MeasureText(\"5\", lbl.Font)";
Debug.JustUpdateDeviceLine();
_r = _cvs.runMethod(false,"MeasureText",(Object)(BA.ObjectToString("5")),(Object)(_lbl.runMethod(false,"getFont")));Debug.locals.put("r", _r);Debug.locals.put("r", _r);
BA.debugLineNum = 99;BA.debugLine="Dim BaseLine As Int = DigitHeight / 2 - r.Height";
Debug.JustUpdateDeviceLine();
_baseline = BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_digitheight" /*RemoteObject*/ ),RemoteObject.createImmutable(2),_r.runMethod(true,"getHeight"),RemoteObject.createImmutable(2),_r.runMethod(true,"getTop")}, "/-/-",2, 0));Debug.locals.put("BaseLine", _baseline);Debug.locals.put("BaseLine", _baseline);
BA.debugLineNum = 100;BA.debugLine="For i = 0 To 9";
Debug.JustUpdateDeviceLine();
{
final int step7 = 1;
final int limit7 = 9;
_i = 0 ;
for (;(step7 > 0 && _i <= limit7) || (step7 < 0 && _i >= limit7) ;_i = ((int)(0 + _i + step7)) ) {
Debug.locals.put("i", _i);
BA.debugLineNum = 101;BA.debugLine="cvs.DrawText(i, DigitWidth / 2, i * DigitHeight";
Debug.JustUpdateDeviceLine();
_cvs.runVoidMethod ("DrawText",__ref.getField(false, "ba"),(Object)(BA.NumberToString(_i)),(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_digitwidth" /*RemoteObject*/ ),RemoteObject.createImmutable(2)}, "/",0, 0))),(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {RemoteObject.createImmutable(_i),__ref.getField(true,"_digitheight" /*RemoteObject*/ ),_baseline}, "*+",1, 1))),(Object)(_lbl.runMethod(false,"getFont")),(Object)(_lbl.runMethod(true,"getTextColor")),(Object)(BA.getEnumFromString(BA.getDeviceClass("android.graphics.Paint.Align"),RemoteObject.createImmutable("CENTER"))));
}
}Debug.locals.put("i", _i);
;
BA.debugLineNum = 103;BA.debugLine="cvs.Invalidate";
Debug.JustUpdateDeviceLine();
_cvs.runVoidMethod ("Invalidate");
BA.debugLineNum = 104;BA.debugLine="Dim res As B4XBitmap = cvs.CreateBitmap";
Debug.JustUpdateDeviceLine();
_res = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper");
_res = _cvs.runMethod(false,"CreateBitmap");Debug.locals.put("res", _res);Debug.locals.put("res", _res);
BA.debugLineNum = 105;BA.debugLine="cvs.Release";
Debug.JustUpdateDeviceLine();
_cvs.runVoidMethod ("Release");
BA.debugLineNum = 106;BA.debugLine="Return res";
Debug.JustUpdateDeviceLine();
if (true) return _res;
BA.debugLineNum = 107;BA.debugLine="End Sub";
Debug.JustUpdateDeviceLine();
return RemoteObject.createImmutable(null);
}
catch (Exception e) {
throw Debug.ErrorCaught(e);
}
finally {
Debug.PopSubsStack();
}}
public static RemoteObject _createfadebitmap(RemoteObject __ref,RemoteObject _clr) throws Exception{
try {
Debug.PushSubsStack("CreateFadeBitmap (animatedcounter) ","animatedcounter",9,__ref.getField(false, "ba"),__ref,56);
if (RapidSub.canDelegate("createfadebitmap")) { return __ref.runUserSub(false, "animatedcounter","createfadebitmap", __ref, _clr);}
RemoteObject _bc = RemoteObject.declareNull("b4a.example.bitmapcreator");
RemoteObject _r = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XCanvas.B4XRect");
RemoteObject _tclr = RemoteObject.createImmutable(0);
Debug.locals.put("clr", _clr);
BA.debugLineNum = 56;BA.debugLine="Private Sub CreateFadeBitmap (clr As Int) As B4XBi";
Debug.JustUpdateDeviceLine();
BA.debugLineNum = 57;BA.debugLine="Dim bc As BitmapCreator";
Debug.JustUpdateDeviceLine();
_bc = RemoteObject.createNew ("b4a.example.bitmapcreator");Debug.locals.put("bc", _bc);
BA.debugLineNum = 58;BA.debugLine="bc.Initialize(200, 50)";
Debug.JustUpdateDeviceLine();
_bc.runVoidMethod ("_initialize",__ref.getField(false, "ba"),(Object)(BA.numberCast(int.class, 200)),(Object)(BA.numberCast(int.class, 50)));
BA.debugLineNum = 59;BA.debugLine="Dim r As B4XRect";
Debug.JustUpdateDeviceLine();
_r = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XCanvas.B4XRect");Debug.locals.put("r", _r);
BA.debugLineNum = 60;BA.debugLine="r.Initialize(0, 0, bc.mWidth, bc.mHeight / 3)";
Debug.JustUpdateDeviceLine();
_r.runVoidMethod ("Initialize",(Object)(BA.numberCast(float.class, 0)),(Object)(BA.numberCast(float.class, 0)),(Object)(BA.numberCast(float.class, _bc.getField(true,"_mwidth"))),(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {_bc.getField(true,"_mheight"),RemoteObject.createImmutable(3)}, "/",0, 0))));
BA.debugLineNum = 61;BA.debugLine="Dim tclr As Int = Bit.And(0x00ffffff, clr)";
Debug.JustUpdateDeviceLine();
_tclr = animatedcounter.__c.getField(false,"Bit").runMethod(true,"And",(Object)(BA.numberCast(int.class, 0x00ffffff)),(Object)(_clr));Debug.locals.put("tclr", _tclr);Debug.locals.put("tclr", _tclr);
BA.debugLineNum = 62;BA.debugLine="bc.FillGradient(Array As Int(clr, tclr), r, \"TOP_";
Debug.JustUpdateDeviceLine();
_bc.runVoidMethod ("_fillgradient",(Object)(RemoteObject.createNewArray("int",new int[] {2},new Object[] {_clr,_tclr})),(Object)(_r),(Object)(RemoteObject.createImmutable("TOP_BOTTOM")));
BA.debugLineNum = 63;BA.debugLine="r.Top = bc.mHeight * 2 / 3";
Debug.JustUpdateDeviceLine();
_r.runMethod(true,"setTop",BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {_bc.getField(true,"_mheight"),RemoteObject.createImmutable(2),RemoteObject.createImmutable(3)}, "*/",0, 0)));
BA.debugLineNum = 64;BA.debugLine="r.Bottom = bc.mHeight";
Debug.JustUpdateDeviceLine();
_r.runMethod(true,"setBottom",BA.numberCast(float.class, _bc.getField(true,"_mheight")));
BA.debugLineNum = 65;BA.debugLine="bc.FillGradient(Array As Int(clr, tclr), r, \"BOTT";
Debug.JustUpdateDeviceLine();
_bc.runVoidMethod ("_fillgradient",(Object)(RemoteObject.createNewArray("int",new int[] {2},new Object[] {_clr,_tclr})),(Object)(_r),(Object)(RemoteObject.createImmutable("BOTTOM_TOP")));
BA.debugLineNum = 66;BA.debugLine="Return bc.Bitmap";
Debug.JustUpdateDeviceLine();
if (true) return _bc.runMethod(false,"_getbitmap");
BA.debugLineNum = 67;BA.debugLine="End Sub";
Debug.JustUpdateDeviceLine();
return RemoteObject.createImmutable(null);
}
catch (Exception e) {
throw Debug.ErrorCaught(e);
}
finally {
Debug.PopSubsStack();
}}
public static RemoteObject _designercreateview(RemoteObject __ref,RemoteObject _base,RemoteObject _lbl,RemoteObject _props) throws Exception{
try {
Debug.PushSubsStack("DesignerCreateView (animatedcounter) ","animatedcounter",9,__ref.getField(false, "ba"),__ref,30);
if (RapidSub.canDelegate("designercreateview")) { return __ref.runUserSub(false, "animatedcounter","designercreateview", __ref, _base, _lbl, _props);}
RemoteObject _pnl = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper");
int _i = 0;
RemoteObject _iv = RemoteObject.declareNull("anywheresoftware.b4a.objects.ImageViewWrapper");
RemoteObject _fadeiv = RemoteObject.declareNull("anywheresoftware.b4a.objects.ImageViewWrapper");
Debug.locals.put("Base", _base);
Debug.locals.put("lbl", _lbl);
Debug.locals.put("Props", _props);
BA.debugLineNum = 30;BA.debugLine="Public Sub DesignerCreateView (Base As Object, lbl";
Debug.JustUpdateDeviceLine();
BA.debugLineNum = 31;BA.debugLine="mBase = Base";
Debug.JustUpdateDeviceLine();
__ref.getField(false,"_mbase" /*RemoteObject*/ ).setObject (_base);
BA.debugLineNum = 32;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me";
Debug.JustUpdateDeviceLine();
__ref.setField ("_tag" /*RemoteObject*/ ,__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(false,"getTag"));
BA.debugLineNum = 32;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me";
Debug.JustUpdateDeviceLine();
__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(false,"setTag",__ref);
BA.debugLineNum = 33;BA.debugLine="Dim pnl As B4XView = xui.CreatePanel(\"\") 'needed";
Debug.JustUpdateDeviceLine();
_pnl = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");
_pnl = __ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(false,"CreatePanel",__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("")));Debug.locals.put("pnl", _pnl);Debug.locals.put("pnl", _pnl);
BA.debugLineNum = 34;BA.debugLine="mBase.AddView(pnl, 0, 0, 0, 0)";
Debug.JustUpdateDeviceLine();
__ref.getField(false,"_mbase" /*RemoteObject*/ ).runVoidMethod ("AddView",(Object)((_pnl.getObject())),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)));
BA.debugLineNum = 35;BA.debugLine="mdigits = Props.Get(\"Digits\")";
Debug.JustUpdateDeviceLine();
__ref.setField ("_mdigits" /*RemoteObject*/ ,BA.numberCast(int.class, _props.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("Digits"))))));
BA.debugLineNum = 36;BA.debugLine="mDuration = Props.Get(\"Duration\")";
Debug.JustUpdateDeviceLine();
__ref.setField ("_mduration" /*RemoteObject*/ ,BA.numberCast(int.class, _props.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("Duration"))))));
BA.debugLineNum = 37;BA.debugLine="lblTemplate = lbl";
Debug.JustUpdateDeviceLine();
__ref.getField(false,"_lbltemplate" /*RemoteObject*/ ).setObject (_lbl.getObject());
BA.debugLineNum = 38;BA.debugLine="fade = CreateFadeBitmap(xui.PaintOrColorToColor(P";
Debug.JustUpdateDeviceLine();
__ref.setField ("_fade" /*RemoteObject*/ ,__ref.runClassMethod (shub.dpm.animatedcounter.class, "_createfadebitmap" /*RemoteObject*/ ,(Object)(__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"PaintOrColorToColor",(Object)(_props.runMethod(false,"GetDefault",(Object)(RemoteObject.createImmutable(("FadeColor"))),(Object)((__ref.getField(false,"_xui" /*RemoteObject*/ ).getField(true,"Color_White")))))))));
BA.debugLineNum = 39;BA.debugLine="For i = 0 To mdigits - 1";
Debug.JustUpdateDeviceLine();
{
final int step10 = 1;
final int limit10 = RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_mdigits" /*RemoteObject*/ ),RemoteObject.createImmutable(1)}, "-",1, 1).<Integer>get().intValue();
_i = 0 ;
for (;(step10 > 0 && _i <= limit10) || (step10 < 0 && _i >= limit10) ;_i = ((int)(0 + _i + step10)) ) {
Debug.locals.put("i", _i);
BA.debugLineNum = 40;BA.debugLine="Dim iv As ImageView";
Debug.JustUpdateDeviceLine();
_iv = RemoteObject.createNew ("anywheresoftware.b4a.objects.ImageViewWrapper");Debug.locals.put("iv", _iv);
BA.debugLineNum = 41;BA.debugLine="iv.Initialize(\"\")";
Debug.JustUpdateDeviceLine();
_iv.runVoidMethod ("Initialize",__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("")));
BA.debugLineNum = 42;BA.debugLine="ImageViews.Add(iv)";
Debug.JustUpdateDeviceLine();
__ref.getField(false,"_imageviews" /*RemoteObject*/ ).runVoidMethod ("Add",(Object)((_iv.getObject())));
BA.debugLineNum = 43;BA.debugLine="mBase.GetView(0).AddView(iv, 0, 0, 0, 0)";
Debug.JustUpdateDeviceLine();
__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(false,"GetView",(Object)(BA.numberCast(int.class, 0))).runVoidMethod ("AddView",(Object)((_iv.getObject())),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)));
}
}Debug.locals.put("i", _i);
;
BA.debugLineNum = 45;BA.debugLine="Dim fadeIv As ImageView";
Debug.JustUpdateDeviceLine();
_fadeiv = RemoteObject.createNew ("anywheresoftware.b4a.objects.ImageViewWrapper");Debug.locals.put("fadeIv", _fadeiv);
BA.debugLineNum = 46;BA.debugLine="fadeIv.Initialize(\"\")";
Debug.JustUpdateDeviceLine();
_fadeiv.runVoidMethod ("Initialize",__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("")));
BA.debugLineNum = 47;BA.debugLine="xfadeIv = fadeIv";
Debug.JustUpdateDeviceLine();
__ref.getField(false,"_xfadeiv" /*RemoteObject*/ ).setObject (_fadeiv.getObject());
BA.debugLineNum = 48;BA.debugLine="mBase.GetView(0).AddView(fadeIv, 0, 0, 0, 0)";
Debug.JustUpdateDeviceLine();
__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(false,"GetView",(Object)(BA.numberCast(int.class, 0))).runVoidMethod ("AddView",(Object)((_fadeiv.getObject())),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)));
BA.debugLineNum = 49;BA.debugLine="setValue(0)";
Debug.JustUpdateDeviceLine();
__ref.runClassMethod (shub.dpm.animatedcounter.class, "_setvalue" /*RemoteObject*/ ,(Object)(BA.numberCast(int.class, 0)));
BA.debugLineNum = 50;BA.debugLine="If xui.IsB4A Then";
Debug.JustUpdateDeviceLine();
if (__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"getIsB4A").<Boolean>get().booleanValue()) {
BA.debugLineNum = 51;BA.debugLine="Base_Resize(mBase.Width, mBase.Height)";
Debug.JustUpdateDeviceLine();
__ref.runClassMethod (shub.dpm.animatedcounter.class, "_base_resize" /*RemoteObject*/ ,(Object)(BA.numberCast(double.class, __ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getWidth"))),(Object)(BA.numberCast(double.class, __ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getHeight"))));
BA.debugLineNum = 52;BA.debugLine="setValue(getValue)";
Debug.JustUpdateDeviceLine();
__ref.runClassMethod (shub.dpm.animatedcounter.class, "_setvalue" /*RemoteObject*/ ,(Object)(__ref.runClassMethod (shub.dpm.animatedcounter.class, "_getvalue" /*RemoteObject*/ )));
};
BA.debugLineNum = 54;BA.debugLine="End Sub";
Debug.JustUpdateDeviceLine();
return RemoteObject.createImmutable("");
}
catch (Exception e) {
throw Debug.ErrorCaught(e);
}
finally {
Debug.PopSubsStack();
}}
public static RemoteObject _getvalue(RemoteObject __ref) throws Exception{
try {
Debug.PushSubsStack("getValue (animatedcounter) ","animatedcounter",9,__ref.getField(false, "ba"),__ref,120);
if (RapidSub.canDelegate("getvalue")) { return __ref.runUserSub(false, "animatedcounter","getvalue", __ref);}
RemoteObject _res = RemoteObject.createImmutable(0);
int _i = 0;
BA.debugLineNum = 120;BA.debugLine="Public Sub getValue As Int";
Debug.JustUpdateDeviceLine();
BA.debugLineNum = 121;BA.debugLine="Dim res As Int";
Debug.JustUpdateDeviceLine();
_res = RemoteObject.createImmutable(0);Debug.locals.put("res", _res);
BA.debugLineNum = 122;BA.debugLine="For i = 0 To mValue.Size - 1";
Debug.JustUpdateDeviceLine();
{
final int step2 = 1;
final int limit2 = RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_mvalue" /*RemoteObject*/ ).runMethod(true,"getSize"),RemoteObject.createImmutable(1)}, "-",1, 1).<Integer>get().intValue();
_i = 0 ;
for (;(step2 > 0 && _i <= limit2) || (step2 < 0 && _i >= limit2) ;_i = ((int)(0 + _i + step2)) ) {
Debug.locals.put("i", _i);
BA.debugLineNum = 123;BA.debugLine="res = res + mValue.Get(i) * Power(10, i)";
Debug.JustUpdateDeviceLine();
_res = BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {_res,BA.numberCast(double.class, __ref.getField(false,"_mvalue" /*RemoteObject*/ ).runMethod(false,"Get",(Object)(BA.numberCast(int.class, _i)))),animatedcounter.__c.runMethod(true,"Power",(Object)(BA.numberCast(double.class, 10)),(Object)(BA.numberCast(double.class, _i)))}, "+*",1, 0));Debug.locals.put("res", _res);
}
}Debug.locals.put("i", _i);
;
BA.debugLineNum = 125;BA.debugLine="Return res";
Debug.JustUpdateDeviceLine();
if (true) return _res;
BA.debugLineNum = 126;BA.debugLine="End Sub";
Debug.JustUpdateDeviceLine();
return RemoteObject.createImmutable(0);
}
catch (Exception e) {
throw Debug.ErrorCaught(e);
}
finally {
Debug.PopSubsStack();
}}
public static RemoteObject _initialize(RemoteObject __ref,RemoteObject _ba,RemoteObject _callback,RemoteObject _eventname) throws Exception{
try {
Debug.PushSubsStack("Initialize (animatedcounter) ","animatedcounter",9,__ref.getField(false, "ba"),__ref,22);
if (RapidSub.canDelegate("initialize")) { return __ref.runUserSub(false, "animatedcounter","initialize", __ref, _ba, _callback, _eventname);}
__ref.runVoidMethodAndSync("innerInitializeHelper", _ba);
Debug.locals.put("ba", _ba);
Debug.locals.put("Callback", _callback);
Debug.locals.put("EventName", _eventname);
BA.debugLineNum = 22;BA.debugLine="Public Sub Initialize (Callback As Object, EventNa";
Debug.JustUpdateDeviceLine();
BA.debugLineNum = 23;BA.debugLine="mEventName = EventName";
Debug.JustUpdateDeviceLine();
__ref.setField ("_meventname" /*RemoteObject*/ ,_eventname);
BA.debugLineNum = 24;BA.debugLine="mCallBack = Callback";
Debug.JustUpdateDeviceLine();
__ref.setField ("_mcallback" /*RemoteObject*/ ,_callback);
BA.debugLineNum = 25;BA.debugLine="ImageViews.Initialize";
Debug.JustUpdateDeviceLine();
__ref.getField(false,"_imageviews" /*RemoteObject*/ ).runVoidMethod ("Initialize");
BA.debugLineNum = 26;BA.debugLine="mValue.Initialize";
Debug.JustUpdateDeviceLine();
__ref.getField(false,"_mvalue" /*RemoteObject*/ ).runVoidMethod ("Initialize");
BA.debugLineNum = 27;BA.debugLine="End Sub";
Debug.JustUpdateDeviceLine();
return RemoteObject.createImmutable("");
}
catch (Exception e) {
throw Debug.ErrorCaught(e);
}
finally {
Debug.PopSubsStack();
}}
public static RemoteObject _setvalue(RemoteObject __ref,RemoteObject _v) throws Exception{
try {
Debug.PushSubsStack("setValue (animatedcounter) ","animatedcounter",9,__ref.getField(false, "ba"),__ref,109);
if (RapidSub.canDelegate("setvalue")) { return __ref.runUserSub(false, "animatedcounter","setvalue", __ref, _v);}
int _i = 0;
RemoteObject _iv = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper");
Debug.locals.put("v", _v);
BA.debugLineNum = 109;BA.debugLine="Public Sub setValue(v As Int)";
Debug.JustUpdateDeviceLine();
BA.debugLineNum = 110;BA.debugLine="mValue.Clear";
Debug.JustUpdateDeviceLine();
__ref.getField(false,"_mvalue" /*RemoteObject*/ ).runVoidMethod ("Clear");
BA.debugLineNum = 111;BA.debugLine="For i = 0 To mdigits - 1";
Debug.JustUpdateDeviceLine();
{
final int step2 = 1;
final int limit2 = RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_mdigits" /*RemoteObject*/ ),RemoteObject.createImmutable(1)}, "-",1, 1).<Integer>get().intValue();
_i = 0 ;
for (;(step2 > 0 && _i <= limit2) || (step2 < 0 && _i >= limit2) ;_i = ((int)(0 + _i + step2)) ) {
Debug.locals.put("i", _i);
BA.debugLineNum = 112;BA.debugLine="mValue.Add(v Mod 10)";
Debug.JustUpdateDeviceLine();
__ref.getField(false,"_mvalue" /*RemoteObject*/ ).runVoidMethod ("Add",(Object)((RemoteObject.solve(new RemoteObject[] {_v,RemoteObject.createImmutable(10)}, "%",0, 1))));
BA.debugLineNum = 113;BA.debugLine="v = v / 10";
Debug.JustUpdateDeviceLine();
_v = BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {_v,RemoteObject.createImmutable(10)}, "/",0, 0));Debug.locals.put("v", _v);
BA.debugLineNum = 114;BA.debugLine="Dim iv As B4XView = ImageViews.Get(i)";
Debug.JustUpdateDeviceLine();
_iv = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");
_iv = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.B4XViewWrapper"), __ref.getField(false,"_imageviews" /*RemoteObject*/ ).runMethod(false,"Get",(Object)(BA.numberCast(int.class, _i))));Debug.locals.put("iv", _iv);
BA.debugLineNum = 115;BA.debugLine="iv.SetLayoutAnimated(mDuration, iv.Left, TopFrom";
Debug.JustUpdateDeviceLine();
_iv.runVoidMethod ("SetLayoutAnimated",(Object)(__ref.getField(true,"_mduration" /*RemoteObject*/ )),(Object)(_iv.runMethod(true,"getLeft")),(Object)(__ref.runClassMethod (shub.dpm.animatedcounter.class, "_topfromvalue" /*RemoteObject*/ ,(Object)(BA.numberCast(int.class, _i)))),(Object)(BA.numberCast(int.class, animatedcounter.__c.runMethod(true,"Max",(Object)(BA.numberCast(double.class, 1)),(Object)(BA.numberCast(double.class, _iv.runMethod(true,"getWidth")))))),(Object)(BA.numberCast(int.class, animatedcounter.__c.runMethod(true,"Max",(Object)(BA.numberCast(double.class, 1)),(Object)(BA.numberCast(double.class, _iv.runMethod(true,"getHeight")))))));
}
}Debug.locals.put("i", _i);
;
BA.debugLineNum = 118;BA.debugLine="End Sub";
Debug.JustUpdateDeviceLine();
return RemoteObject.createImmutable("");
}
catch (Exception e) {
throw Debug.ErrorCaught(e);
}
finally {
Debug.PopSubsStack();
}}
public static RemoteObject _topfromvalue(RemoteObject __ref,RemoteObject _digit) throws Exception{
try {
Debug.PushSubsStack("TopFromValue (animatedcounter) ","animatedcounter",9,__ref.getField(false, "ba"),__ref,88);
if (RapidSub.canDelegate("topfromvalue")) { return __ref.runUserSub(false, "animatedcounter","topfromvalue", __ref, _digit);}
RemoteObject _d = RemoteObject.createImmutable(0);
Debug.locals.put("Digit", _digit);
BA.debugLineNum = 88;BA.debugLine="Private Sub TopFromValue (Digit As Int) As Int";
Debug.JustUpdateDeviceLine();
BA.debugLineNum = 89;BA.debugLine="Dim d As Int = mValue.Get(Digit)";
Debug.JustUpdateDeviceLine();
_d = BA.numberCast(int.class, __ref.getField(false,"_mvalue" /*RemoteObject*/ ).runMethod(false,"Get",(Object)(_digit)));Debug.locals.put("d", _d);Debug.locals.put("d", _d);
BA.debugLineNum = 90;BA.debugLine="Return -d * DigitHeight";
Debug.JustUpdateDeviceLine();
if (true) return BA.numberCast(int.class, -(double) (0 + _d.<Integer>get().intValue())*(double) (0 + __ref.getField(true,"_digitheight" /*RemoteObject*/ ).<Integer>get().intValue()));
BA.debugLineNum = 91;BA.debugLine="End Sub";
Debug.JustUpdateDeviceLine();
return RemoteObject.createImmutable(0);
}
catch (Exception e) {
throw Debug.ErrorCaught(e);
}
finally {
Debug.PopSubsStack();
}}
}

View File

@@ -0,0 +1,46 @@
package shub.dpm;
import anywheresoftware.b4a.pc.PCBA;
import anywheresoftware.b4a.pc.RemoteObject;
public class anotherprogressbar {
public static RemoteObject myClass;
public anotherprogressbar() {
}
public static PCBA staticBA = new PCBA(null, anotherprogressbar.class);
public static RemoteObject __c = RemoteObject.declareNull("anywheresoftware.b4a.keywords.Common");
public static RemoteObject _meventname = RemoteObject.createImmutable("");
public static RemoteObject _mcallback = RemoteObject.declareNull("Object");
public static RemoteObject _mbase = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper");
public static RemoteObject _xui = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper.XUI");
public static RemoteObject _busybrush = RemoteObject.declareNull("b4a.example.bcpath._bcbrush");
public static RemoteObject _backgroundcolor = RemoteObject.createImmutable(0);
public static RemoteObject _busyindex = RemoteObject.createImmutable(0);
public static RemoteObject _bc = RemoteObject.declareNull("b4a.example.bitmapcreator");
public static RemoteObject _miv = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper");
public static RemoteObject _transparentbrush = RemoteObject.declareNull("b4a.example.bcpath._bcbrush");
public static RemoteObject _vertical = RemoteObject.createImmutable(false);
public static RemoteObject _currentvalue = RemoteObject.createImmutable(0f);
public static RemoteObject _emptycolor = RemoteObject.createImmutable(0);
public static RemoteObject _emptybrush = RemoteObject.declareNull("b4a.example.bcpath._bcbrush");
public static RemoteObject _mvalue = RemoteObject.createImmutable(0);
public static RemoteObject _tag = RemoteObject.declareNull("Object");
public static RemoteObject _valuechangepersecond = RemoteObject.createImmutable(0f);
public static RemoteObject _cornerradius = RemoteObject.createImmutable(0);
public static RemoteObject _brushoffsetdelta = RemoteObject.createImmutable(0);
public static RemoteObject _dateutils = RemoteObject.declareNull("b4a.example.dateutils");
public static shub.dpm.main _main = null;
public static shub.dpm.listdata _listdata = null;
public static shub.dpm.param _param = null;
public static shub.dpm.starter _starter = null;
public static shub.dpm.tempdata _tempdata = null;
public static shub.dpm.about _about = null;
public static shub.dpm.appmain _appmain = null;
public static shub.dpm.httputils2service _httputils2service = null;
public static shub.dpm.xuiviewsutils _xuiviewsutils = null;
public static Object[] GetGlobals(RemoteObject _ref) throws Exception {
return new Object[] {"BackgroundColor",_ref.getField(false, "_backgroundcolor"),"bc",_ref.getField(false, "_bc"),"BrushOffsetDelta",_ref.getField(false, "_brushoffsetdelta"),"BusyBrush",_ref.getField(false, "_busybrush"),"BusyIndex",_ref.getField(false, "_busyindex"),"CornerRadius",_ref.getField(false, "_cornerradius"),"CurrentValue",_ref.getField(false, "_currentvalue"),"DateUtils",_ref.getField(false, "_dateutils"),"EmptyBrush",_ref.getField(false, "_emptybrush"),"EmptyColor",_ref.getField(false, "_emptycolor"),"mBase",_ref.getField(false, "_mbase"),"mCallBack",_ref.getField(false, "_mcallback"),"mEventName",_ref.getField(false, "_meventname"),"mIV",_ref.getField(false, "_miv"),"mValue",_ref.getField(false, "_mvalue"),"Tag",_ref.getField(false, "_tag"),"TransparentBrush",_ref.getField(false, "_transparentbrush"),"ValueChangePerSecond",_ref.getField(false, "_valuechangepersecond"),"Vertical",_ref.getField(false, "_vertical"),"xui",_ref.getField(false, "_xui")};
}
}

View File

@@ -0,0 +1,740 @@
package shub.dpm;
import anywheresoftware.b4a.BA;
import anywheresoftware.b4a.pc.*;
public class anotherprogressbar_subs_0 {
public static RemoteObject _base_resize(RemoteObject __ref,RemoteObject _width,RemoteObject _height) throws Exception{
try {
Debug.PushSubsStack("Base_Resize (anotherprogressbar) ","anotherprogressbar",10,__ref.getField(false, "ba"),__ref,49);
if (RapidSub.canDelegate("base_resize")) { return __ref.runUserSub(false, "anotherprogressbar","base_resize", __ref, _width, _height);}
RemoteObject _v = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper");
Debug.locals.put("Width", _width);
Debug.locals.put("Height", _height);
BA.debugLineNum = 49;BA.debugLine="Private Sub Base_Resize (Width As Double, Height A";
Debug.JustUpdateDeviceLine();
BA.debugLineNum = 50;BA.debugLine="For Each v As B4XView In mBase.GetAllViewsRecursi";
Debug.JustUpdateDeviceLine();
_v = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");
{
final RemoteObject group1 = __ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(false,"GetAllViewsRecursive");
final int groupLen1 = group1.runMethod(true,"getSize").<Integer>get()
;int index1 = 0;
;
for (; index1 < groupLen1;index1++){
_v = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.B4XViewWrapper"), group1.runMethod(false,"Get",index1));
Debug.locals.put("v", _v);
BA.debugLineNum = 51;BA.debugLine="v.SetLayoutAnimated(0, 0, 0, Width, Height)";
Debug.JustUpdateDeviceLine();
_v.runVoidMethod ("SetLayoutAnimated",(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, _width)),(Object)(BA.numberCast(int.class, _height)));
}
}Debug.locals.put("v", _v);
;
BA.debugLineNum = 53;BA.debugLine="bc.Initialize(mBase.Width / xui.Scale, mBase.Heig";
Debug.JustUpdateDeviceLine();
__ref.getField(false,"_bc" /*RemoteObject*/ ).runVoidMethod ("_initialize",__ref.getField(false, "ba"),(Object)(BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getWidth"),__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"getScale")}, "/",0, 0))),(Object)(BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getHeight"),__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"getScale")}, "/",0, 0))));
BA.debugLineNum = 54;BA.debugLine="Vertical = mBase.Height > mBase.Width";
Debug.JustUpdateDeviceLine();
__ref.setField ("_vertical" /*RemoteObject*/ ,BA.ObjectToBoolean(RemoteObject.solveBoolean(">",__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getHeight"),BA.numberCast(double.class, __ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getWidth")))));
BA.debugLineNum = 55;BA.debugLine="UpdateGraphics";
Debug.JustUpdateDeviceLine();
__ref.runClassMethod (shub.dpm.anotherprogressbar.class, "_updategraphics" /*RemoteObject*/ );
BA.debugLineNum = 57;BA.debugLine="End Sub";
Debug.JustUpdateDeviceLine();
return RemoteObject.createImmutable("");
}
catch (Exception e) {
throw Debug.ErrorCaught(e);
}
finally {
Debug.PopSubsStack();
}}
public static void _busyloop(RemoteObject __ref) throws Exception{
try {
Debug.PushSubsStack("BusyLoop (anotherprogressbar) ","anotherprogressbar",10,__ref.getField(false, "ba"),__ref,59);
if (RapidSub.canDelegate("busyloop")) { __ref.runUserSub(false, "anotherprogressbar","busyloop", __ref); return;}
ResumableSub_BusyLoop rsub = new ResumableSub_BusyLoop(null,__ref);
rsub.resume(null, null);
}
catch (Exception e) {
throw Debug.ErrorCaught(e);
}
finally {
Debug.PopSubsStack();
}}
public static class ResumableSub_BusyLoop extends BA.ResumableSub {
public ResumableSub_BusyLoop(shub.dpm.anotherprogressbar parent,RemoteObject __ref) {
this.parent = parent;
this.__ref = __ref;
}
java.util.LinkedHashMap<String, Object> rsLocals = new java.util.LinkedHashMap<String, Object>();
RemoteObject __ref;
shub.dpm.anotherprogressbar parent;
RemoteObject _myindex = RemoteObject.createImmutable(0);
RemoteObject _r = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XCanvas.B4XRect");
RemoteObject _lasttime = RemoteObject.createImmutable(0L);
RemoteObject _tasks = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.List");
RemoteObject _delta = RemoteObject.createImmutable(0f);
RemoteObject _change = RemoteObject.createImmutable(0f);
RemoteObject _bmp = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper.B4XBitmapWrapper");
@Override
public void resume(BA ba, RemoteObject result) throws Exception{
try {
Debug.PushSubsStack("BusyLoop (anotherprogressbar) ","anotherprogressbar",10,__ref.getField(false, "ba"),__ref,59);
Debug.locals = rsLocals;Debug.currentSubFrame.locals = rsLocals;
while (true) {
switch (state) {
case -1:
return;
case 0:
//C
this.state = 1;
Debug.locals.put("_ref", __ref);
BA.debugLineNum = 60;BA.debugLine="Dim MyIndex As Int = BusyIndex";
Debug.JustUpdateDeviceLine();
_myindex = __ref.getField(true,"_busyindex" /*RemoteObject*/ );Debug.locals.put("MyIndex", _myindex);Debug.locals.put("MyIndex", _myindex);
BA.debugLineNum = 61;BA.debugLine="Dim r As B4XRect";
Debug.JustUpdateDeviceLine();
_r = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XCanvas.B4XRect");Debug.locals.put("r", _r);
BA.debugLineNum = 62;BA.debugLine="r.Initialize(0, 0, bc.mWidth, bc.mHeight)";
Debug.JustUpdateDeviceLine();
_r.runVoidMethod ("Initialize",(Object)(BA.numberCast(float.class, 0)),(Object)(BA.numberCast(float.class, 0)),(Object)(BA.numberCast(float.class, __ref.getField(false,"_bc" /*RemoteObject*/ ).getField(true,"_mwidth"))),(Object)(BA.numberCast(float.class, __ref.getField(false,"_bc" /*RemoteObject*/ ).getField(true,"_mheight"))));
BA.debugLineNum = 63;BA.debugLine="Dim LastTime As Long = DateTime.Now";
Debug.JustUpdateDeviceLine();
_lasttime = parent.__c.getField(false,"DateTime").runMethod(true,"getNow");Debug.locals.put("LastTime", _lasttime);Debug.locals.put("LastTime", _lasttime);
BA.debugLineNum = 64;BA.debugLine="Do While MyIndex = BusyIndex";
Debug.JustUpdateDeviceLine();
if (true) break;
case 1:
//do while
this.state = 37;
while (RemoteObject.solveBoolean("=",_myindex,BA.numberCast(double.class, __ref.getField(true,"_busyindex" /*RemoteObject*/ )))) {
this.state = 3;
if (true) break;
}
if (true) break;
case 3:
//C
this.state = 4;
BA.debugLineNum = 65;BA.debugLine="If Vertical Then";
Debug.JustUpdateDeviceLine();
if (true) break;
case 4:
//if
this.state = 9;
if (__ref.getField(true,"_vertical" /*RemoteObject*/ ).<Boolean>get().booleanValue()) {
this.state = 6;
}else {
this.state = 8;
}if (true) break;
case 6:
//C
this.state = 9;
BA.debugLineNum = 66;BA.debugLine="BusyBrush.SrcOffsetY = BusyBrush.SrcOffsetY + B";
Debug.JustUpdateDeviceLine();
__ref.getField(false,"_busybrush" /*RemoteObject*/ ).setField ("SrcOffsetY",RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_busybrush" /*RemoteObject*/ ).getField(true,"SrcOffsetY"),__ref.getField(true,"_brushoffsetdelta" /*RemoteObject*/ )}, "+",1, 1));
if (true) break;
case 8:
//C
this.state = 9;
BA.debugLineNum = 68;BA.debugLine="BusyBrush.SrcOffsetX = BusyBrush.SrcOffsetX + B";
Debug.JustUpdateDeviceLine();
__ref.getField(false,"_busybrush" /*RemoteObject*/ ).setField ("SrcOffsetX",RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_busybrush" /*RemoteObject*/ ).getField(true,"SrcOffsetX"),__ref.getField(true,"_brushoffsetdelta" /*RemoteObject*/ )}, "+",1, 1));
if (true) break;
case 9:
//C
this.state = 10;
;
BA.debugLineNum = 70;BA.debugLine="Dim tasks As List";
Debug.JustUpdateDeviceLine();
_tasks = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.List");Debug.locals.put("tasks", _tasks);
BA.debugLineNum = 71;BA.debugLine="tasks.Initialize";
Debug.JustUpdateDeviceLine();
_tasks.runVoidMethod ("Initialize");
BA.debugLineNum = 72;BA.debugLine="tasks.Add(bc.AsyncDrawRect(bc.TargetRect, Transp";
Debug.JustUpdateDeviceLine();
_tasks.runVoidMethod ("Add",(Object)((__ref.getField(false,"_bc" /*RemoteObject*/ ).runMethod(false,"_asyncdrawrect",(Object)(__ref.getField(false,"_bc" /*RemoteObject*/ ).getField(false,"_targetrect")),(Object)(__ref.getField(false,"_transparentbrush" /*RemoteObject*/ )),(Object)(parent.__c.getField(true,"True")),(Object)(BA.numberCast(int.class, 0))))));
BA.debugLineNum = 73;BA.debugLine="Dim delta As Float = mValue - CurrentValue";
Debug.JustUpdateDeviceLine();
_delta = BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_mvalue" /*RemoteObject*/ ),__ref.getField(true,"_currentvalue" /*RemoteObject*/ )}, "-",1, 0));Debug.locals.put("delta", _delta);Debug.locals.put("delta", _delta);
BA.debugLineNum = 74;BA.debugLine="If Abs(delta) <= 1 Then";
Debug.JustUpdateDeviceLine();
if (true) break;
case 10:
//if
this.state = 21;
if (RemoteObject.solveBoolean("k",parent.__c.runMethod(true,"Abs",(Object)(BA.numberCast(double.class, _delta))),BA.numberCast(double.class, 1))) {
this.state = 12;
}else {
this.state = 14;
}if (true) break;
case 12:
//C
this.state = 21;
BA.debugLineNum = 75;BA.debugLine="CurrentValue = mValue";
Debug.JustUpdateDeviceLine();
__ref.setField ("_currentvalue" /*RemoteObject*/ ,BA.numberCast(float.class, __ref.getField(true,"_mvalue" /*RemoteObject*/ )));
if (true) break;
case 14:
//C
this.state = 15;
BA.debugLineNum = 77;BA.debugLine="Dim change As Float = (DateTime.Now - LastTime)";
Debug.JustUpdateDeviceLine();
_change = BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {(RemoteObject.solve(new RemoteObject[] {parent.__c.getField(false,"DateTime").runMethod(true,"getNow"),_lasttime}, "-",1, 2)),RemoteObject.createImmutable(1000),__ref.getField(true,"_valuechangepersecond" /*RemoteObject*/ )}, "/*",0, 0));Debug.locals.put("change", _change);Debug.locals.put("change", _change);
BA.debugLineNum = 78;BA.debugLine="If delta > 0 Then";
Debug.JustUpdateDeviceLine();
if (true) break;
case 15:
//if
this.state = 20;
if (RemoteObject.solveBoolean(">",_delta,BA.numberCast(double.class, 0))) {
this.state = 17;
}else {
this.state = 19;
}if (true) break;
case 17:
//C
this.state = 20;
BA.debugLineNum = 79;BA.debugLine="CurrentValue = CurrentValue + Min(change, mVal";
Debug.JustUpdateDeviceLine();
__ref.setField ("_currentvalue" /*RemoteObject*/ ,BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_currentvalue" /*RemoteObject*/ ),parent.__c.runMethod(true,"Min",(Object)(BA.numberCast(double.class, _change)),(Object)(RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_mvalue" /*RemoteObject*/ ),__ref.getField(true,"_currentvalue" /*RemoteObject*/ )}, "-",1, 0)))}, "+",1, 0)));
if (true) break;
case 19:
//C
this.state = 20;
BA.debugLineNum = 81;BA.debugLine="CurrentValue = CurrentValue - Min(change, Curr";
Debug.JustUpdateDeviceLine();
__ref.setField ("_currentvalue" /*RemoteObject*/ ,BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_currentvalue" /*RemoteObject*/ ),parent.__c.runMethod(true,"Min",(Object)(BA.numberCast(double.class, _change)),(Object)(RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_currentvalue" /*RemoteObject*/ ),__ref.getField(true,"_mvalue" /*RemoteObject*/ )}, "-",1, 0)))}, "-",1, 0)));
if (true) break;
case 20:
//C
this.state = 21;
;
if (true) break;
case 21:
//C
this.state = 22;
;
BA.debugLineNum = 84;BA.debugLine="LastTime = DateTime.Now";
Debug.JustUpdateDeviceLine();
_lasttime = parent.__c.getField(false,"DateTime").runMethod(true,"getNow");Debug.locals.put("LastTime", _lasttime);
BA.debugLineNum = 85;BA.debugLine="If CurrentValue < 100 Then";
Debug.JustUpdateDeviceLine();
if (true) break;
case 22:
//if
this.state = 25;
if (RemoteObject.solveBoolean("<",__ref.getField(true,"_currentvalue" /*RemoteObject*/ ),BA.numberCast(double.class, 100))) {
this.state = 24;
}if (true) break;
case 24:
//C
this.state = 25;
BA.debugLineNum = 86;BA.debugLine="tasks.Add(bc.AsyncDrawRectRounded(bc.TargetRect";
Debug.JustUpdateDeviceLine();
_tasks.runVoidMethod ("Add",(Object)((__ref.getField(false,"_bc" /*RemoteObject*/ ).runMethod(false,"_asyncdrawrectrounded",(Object)(__ref.getField(false,"_bc" /*RemoteObject*/ ).getField(false,"_targetrect")),(Object)(__ref.getField(false,"_emptybrush" /*RemoteObject*/ )),(Object)(parent.__c.getField(true,"True")),(Object)(BA.numberCast(int.class, 0)),(Object)(__ref.getField(true,"_cornerradius" /*RemoteObject*/ ))))));
if (true) break;
;
BA.debugLineNum = 88;BA.debugLine="If Vertical Then";
Debug.JustUpdateDeviceLine();
case 25:
//if
this.state = 30;
if (__ref.getField(true,"_vertical" /*RemoteObject*/ ).<Boolean>get().booleanValue()) {
this.state = 27;
}else {
this.state = 29;
}if (true) break;
case 27:
//C
this.state = 30;
BA.debugLineNum = 89;BA.debugLine="r.Bottom = Round(CurrentValue / 100 * bc.mHeigh";
Debug.JustUpdateDeviceLine();
_r.runMethod(true,"setBottom",BA.numberCast(float.class, parent.__c.runMethod(true,"Round",(Object)(RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_currentvalue" /*RemoteObject*/ ),RemoteObject.createImmutable(100),__ref.getField(false,"_bc" /*RemoteObject*/ ).getField(true,"_mheight")}, "/*",0, 0)))));
if (true) break;
case 29:
//C
this.state = 30;
BA.debugLineNum = 91;BA.debugLine="r.Right = Round(CurrentValue / 100 * bc.mWidth)";
Debug.JustUpdateDeviceLine();
_r.runMethod(true,"setRight",BA.numberCast(float.class, parent.__c.runMethod(true,"Round",(Object)(RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_currentvalue" /*RemoteObject*/ ),RemoteObject.createImmutable(100),__ref.getField(false,"_bc" /*RemoteObject*/ ).getField(true,"_mwidth")}, "/*",0, 0)))));
if (true) break;
case 30:
//C
this.state = 31;
;
BA.debugLineNum = 94;BA.debugLine="tasks.Add(bc.AsyncDrawRectRounded(r, BusyBrush,";
Debug.JustUpdateDeviceLine();
_tasks.runVoidMethod ("Add",(Object)((__ref.getField(false,"_bc" /*RemoteObject*/ ).runMethod(false,"_asyncdrawrectrounded",(Object)(_r),(Object)(__ref.getField(false,"_busybrush" /*RemoteObject*/ )),(Object)(parent.__c.getField(true,"True")),(Object)(BA.numberCast(int.class, 0)),(Object)(__ref.getField(true,"_cornerradius" /*RemoteObject*/ ))))));
BA.debugLineNum = 95;BA.debugLine="bc.DrawBitmapCreatorsAsync(Me, \"BC\", tasks)";
Debug.JustUpdateDeviceLine();
__ref.getField(false,"_bc" /*RemoteObject*/ ).runVoidMethod ("_drawbitmapcreatorsasync",(Object)(__ref),(Object)(BA.ObjectToString("BC")),(Object)(_tasks));
BA.debugLineNum = 96;BA.debugLine="Wait For BC_BitmapReady (bmp As B4XBitmap)";
Debug.JustUpdateDeviceLine();
parent.__c.runVoidMethod ("WaitFor","bc_bitmapready", __ref.getField(false, "ba"), anywheresoftware.b4a.pc.PCResumableSub.createDebugResumeSub(this, "anotherprogressbar", "busyloop"), null);
this.state = 38;
return;
case 38:
//C
this.state = 31;
_bmp = (RemoteObject) result.getArrayElement(false,RemoteObject.createImmutable(1));Debug.locals.put("bmp", _bmp);
;
BA.debugLineNum = 97;BA.debugLine="If xui.IsB4J Then bmp = bc.Bitmap";
Debug.JustUpdateDeviceLine();
if (true) break;
case 31:
//if
this.state = 36;
if (__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"getIsB4J").<Boolean>get().booleanValue()) {
this.state = 33;
;}if (true) break;
case 33:
//C
this.state = 36;
_bmp = __ref.getField(false,"_bc" /*RemoteObject*/ ).runMethod(false,"_getbitmap");Debug.locals.put("bmp", _bmp);
if (true) break;
case 36:
//C
this.state = 1;
;
BA.debugLineNum = 98;BA.debugLine="bc.SetBitmapToImageView(bmp, mIV)";
Debug.JustUpdateDeviceLine();
__ref.getField(false,"_bc" /*RemoteObject*/ ).runVoidMethod ("_setbitmaptoimageview",(Object)(_bmp),(Object)(__ref.getField(false,"_miv" /*RemoteObject*/ )));
BA.debugLineNum = 99;BA.debugLine="Sleep(30)";
Debug.JustUpdateDeviceLine();
parent.__c.runVoidMethod ("Sleep",__ref.getField(false, "ba"),anywheresoftware.b4a.pc.PCResumableSub.createDebugResumeSub(this, "anotherprogressbar", "busyloop"),BA.numberCast(int.class, 30));
this.state = 39;
return;
case 39:
//C
this.state = 1;
;
if (true) break;
case 37:
//C
this.state = -1;
;
BA.debugLineNum = 101;BA.debugLine="End Sub";
Debug.JustUpdateDeviceLine();
if (true) break;
}
}
}
catch (Exception e) {
throw Debug.ErrorCaught(e);
}
finally {
Debug.PopSubsStack();
}}
}
public static void _bc_bitmapready(RemoteObject __ref,RemoteObject _bmp) throws Exception{
}
public static RemoteObject _class_globals(RemoteObject __ref) throws Exception{
//BA.debugLineNum = 4;BA.debugLine="Sub Class_Globals";
//BA.debugLineNum = 5;BA.debugLine="Private mEventName As String 'ignore";
anotherprogressbar._meventname = RemoteObject.createImmutable("");__ref.setField("_meventname",anotherprogressbar._meventname);
//BA.debugLineNum = 6;BA.debugLine="Private mCallBack As Object 'ignore";
anotherprogressbar._mcallback = RemoteObject.createNew ("Object");__ref.setField("_mcallback",anotherprogressbar._mcallback);
//BA.debugLineNum = 7;BA.debugLine="Public mBase As B4XView 'ignore";
anotherprogressbar._mbase = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_mbase",anotherprogressbar._mbase);
//BA.debugLineNum = 8;BA.debugLine="Private xui As XUI 'ignore";
anotherprogressbar._xui = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper.XUI");__ref.setField("_xui",anotherprogressbar._xui);
//BA.debugLineNum = 9;BA.debugLine="Private BusyBrush As BCBrush";
anotherprogressbar._busybrush = RemoteObject.createNew ("b4a.example.bcpath._bcbrush");__ref.setField("_busybrush",anotherprogressbar._busybrush);
//BA.debugLineNum = 10;BA.debugLine="Private BackgroundColor As Int";
anotherprogressbar._backgroundcolor = RemoteObject.createImmutable(0);__ref.setField("_backgroundcolor",anotherprogressbar._backgroundcolor);
//BA.debugLineNum = 11;BA.debugLine="Private BusyIndex As Int";
anotherprogressbar._busyindex = RemoteObject.createImmutable(0);__ref.setField("_busyindex",anotherprogressbar._busyindex);
//BA.debugLineNum = 12;BA.debugLine="Private bc As BitmapCreator";
anotherprogressbar._bc = RemoteObject.createNew ("b4a.example.bitmapcreator");__ref.setField("_bc",anotherprogressbar._bc);
//BA.debugLineNum = 13;BA.debugLine="Private mIV As B4XView";
anotherprogressbar._miv = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_miv",anotherprogressbar._miv);
//BA.debugLineNum = 14;BA.debugLine="Private TransparentBrush As BCBrush";
anotherprogressbar._transparentbrush = RemoteObject.createNew ("b4a.example.bcpath._bcbrush");__ref.setField("_transparentbrush",anotherprogressbar._transparentbrush);
//BA.debugLineNum = 15;BA.debugLine="Private Vertical As Boolean";
anotherprogressbar._vertical = RemoteObject.createImmutable(false);__ref.setField("_vertical",anotherprogressbar._vertical);
//BA.debugLineNum = 16;BA.debugLine="Private CurrentValue As Float";
anotherprogressbar._currentvalue = RemoteObject.createImmutable(0f);__ref.setField("_currentvalue",anotherprogressbar._currentvalue);
//BA.debugLineNum = 17;BA.debugLine="Public EmptyColor As Int = xui.Color_White";
anotherprogressbar._emptycolor = __ref.getField(false,"_xui" /*RemoteObject*/ ).getField(true,"Color_White");__ref.setField("_emptycolor",anotherprogressbar._emptycolor);
//BA.debugLineNum = 18;BA.debugLine="Private EmptyBrush As BCBrush";
anotherprogressbar._emptybrush = RemoteObject.createNew ("b4a.example.bcpath._bcbrush");__ref.setField("_emptybrush",anotherprogressbar._emptybrush);
//BA.debugLineNum = 19;BA.debugLine="Private mValue As Int";
anotherprogressbar._mvalue = RemoteObject.createImmutable(0);__ref.setField("_mvalue",anotherprogressbar._mvalue);
//BA.debugLineNum = 20;BA.debugLine="Public Tag As Object";
anotherprogressbar._tag = RemoteObject.createNew ("Object");__ref.setField("_tag",anotherprogressbar._tag);
//BA.debugLineNum = 21;BA.debugLine="Public ValueChangePerSecond As Float = 60";
anotherprogressbar._valuechangepersecond = BA.numberCast(float.class, 60);__ref.setField("_valuechangepersecond",anotherprogressbar._valuechangepersecond);
//BA.debugLineNum = 22;BA.debugLine="Public CornerRadius As Int";
anotherprogressbar._cornerradius = RemoteObject.createImmutable(0);__ref.setField("_cornerradius",anotherprogressbar._cornerradius);
//BA.debugLineNum = 23;BA.debugLine="Public BrushOffsetDelta As Int = 3";
anotherprogressbar._brushoffsetdelta = BA.numberCast(int.class, 3);__ref.setField("_brushoffsetdelta",anotherprogressbar._brushoffsetdelta);
//BA.debugLineNum = 24;BA.debugLine="End Sub";
return RemoteObject.createImmutable("");
}
public static RemoteObject _designercreateview(RemoteObject __ref,RemoteObject _base,RemoteObject _lbl,RemoteObject _props) throws Exception{
try {
Debug.PushSubsStack("DesignerCreateView (anotherprogressbar) ","anotherprogressbar",10,__ref.getField(false, "ba"),__ref,32);
if (RapidSub.canDelegate("designercreateview")) { return __ref.runUserSub(false, "anotherprogressbar","designercreateview", __ref, _base, _lbl, _props);}
RemoteObject _iv = RemoteObject.declareNull("anywheresoftware.b4a.objects.ImageViewWrapper");
Debug.locals.put("Base", _base);
Debug.locals.put("lbl", _lbl);
Debug.locals.put("Props", _props);
BA.debugLineNum = 32;BA.debugLine="Public Sub DesignerCreateView (Base As Object, lbl";
Debug.JustUpdateDeviceLine();
BA.debugLineNum = 33;BA.debugLine="mBase = Base";
Debug.JustUpdateDeviceLine();
__ref.getField(false,"_mbase" /*RemoteObject*/ ).setObject (_base);
BA.debugLineNum = 34;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me";
Debug.JustUpdateDeviceLine();
__ref.setField ("_tag" /*RemoteObject*/ ,__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(false,"getTag"));
BA.debugLineNum = 34;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me";
Debug.JustUpdateDeviceLine();
__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(false,"setTag",__ref);
BA.debugLineNum = 35;BA.debugLine="Dim iv As ImageView";
Debug.JustUpdateDeviceLine();
_iv = RemoteObject.createNew ("anywheresoftware.b4a.objects.ImageViewWrapper");Debug.locals.put("iv", _iv);
BA.debugLineNum = 36;BA.debugLine="iv.Initialize(\"\")";
Debug.JustUpdateDeviceLine();
_iv.runVoidMethod ("Initialize",__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("")));
BA.debugLineNum = 37;BA.debugLine="mIV = iv";
Debug.JustUpdateDeviceLine();
__ref.getField(false,"_miv" /*RemoteObject*/ ).setObject (_iv.getObject());
BA.debugLineNum = 38;BA.debugLine="mIV.Color = xui.Color_Transparent";
Debug.JustUpdateDeviceLine();
__ref.getField(false,"_miv" /*RemoteObject*/ ).runMethod(true,"setColor",__ref.getField(false,"_xui" /*RemoteObject*/ ).getField(true,"Color_Transparent"));
BA.debugLineNum = 39;BA.debugLine="setValue(Props.GetDefault(\"Value\", 100))";
Debug.JustUpdateDeviceLine();
__ref.runClassMethod (shub.dpm.anotherprogressbar.class, "_setvalue" /*RemoteObject*/ ,(Object)(BA.numberCast(int.class, _props.runMethod(false,"GetDefault",(Object)(RemoteObject.createImmutable(("Value"))),(Object)(RemoteObject.createImmutable((100)))))));
BA.debugLineNum = 40;BA.debugLine="CurrentValue = mValue";
Debug.JustUpdateDeviceLine();
__ref.setField ("_currentvalue" /*RemoteObject*/ ,BA.numberCast(float.class, __ref.getField(true,"_mvalue" /*RemoteObject*/ )));
BA.debugLineNum = 41;BA.debugLine="mBase.AddView(mIV, 0, 0, 0, 0)";
Debug.JustUpdateDeviceLine();
__ref.getField(false,"_mbase" /*RemoteObject*/ ).runVoidMethod ("AddView",(Object)((__ref.getField(false,"_miv" /*RemoteObject*/ ).getObject())),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)));
BA.debugLineNum = 42;BA.debugLine="mBase.AddView(lbl, 0, 0, mBase.Width, mBase.Heigh";
Debug.JustUpdateDeviceLine();
__ref.getField(false,"_mbase" /*RemoteObject*/ ).runVoidMethod ("AddView",(Object)((_lbl.getObject())),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getWidth")),(Object)(__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getHeight")));
BA.debugLineNum = 43;BA.debugLine="mBase.SetColorAndBorder(xui.Color_Transparent, 0,";
Debug.JustUpdateDeviceLine();
__ref.getField(false,"_mbase" /*RemoteObject*/ ).runVoidMethod ("SetColorAndBorder",(Object)(__ref.getField(false,"_xui" /*RemoteObject*/ ).getField(true,"Color_Transparent")),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)));
BA.debugLineNum = 44;BA.debugLine="BackgroundColor = xui.PaintOrColorToColor(Props.G";
Debug.JustUpdateDeviceLine();
__ref.setField ("_backgroundcolor" /*RemoteObject*/ ,__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"PaintOrColorToColor",(Object)(_props.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("ProgressColor")))))));
BA.debugLineNum = 45;BA.debugLine="CornerRadius = Props.GetDefault(\"CornerRadius\", 1";
Debug.JustUpdateDeviceLine();
__ref.setField ("_cornerradius" /*RemoteObject*/ ,BA.numberCast(int.class, _props.runMethod(false,"GetDefault",(Object)(RemoteObject.createImmutable(("CornerRadius"))),(Object)(RemoteObject.createImmutable((15))))));
BA.debugLineNum = 46;BA.debugLine="Base_Resize(mBase.Width, mBase.Height)";
Debug.JustUpdateDeviceLine();
__ref.runClassMethod (shub.dpm.anotherprogressbar.class, "_base_resize" /*RemoteObject*/ ,(Object)(BA.numberCast(double.class, __ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getWidth"))),(Object)(BA.numberCast(double.class, __ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getHeight"))));
BA.debugLineNum = 47;BA.debugLine="End Sub";
Debug.JustUpdateDeviceLine();
return RemoteObject.createImmutable("");
}
catch (Exception e) {
throw Debug.ErrorCaught(e);
}
finally {
Debug.PopSubsStack();
}}
public static RemoteObject _getprogresscolor(RemoteObject __ref) throws Exception{
try {
Debug.PushSubsStack("getProgressColor (anotherprogressbar) ","anotherprogressbar",10,__ref.getField(false, "ba"),__ref,103);
if (RapidSub.canDelegate("getprogresscolor")) { return __ref.runUserSub(false, "anotherprogressbar","getprogresscolor", __ref);}
BA.debugLineNum = 103;BA.debugLine="Public Sub getProgressColor As Int";
Debug.JustUpdateDeviceLine();
BA.debugLineNum = 104;BA.debugLine="Return BackgroundColor";
Debug.JustUpdateDeviceLine();
if (true) return __ref.getField(true,"_backgroundcolor" /*RemoteObject*/ );
BA.debugLineNum = 105;BA.debugLine="End Sub";
Debug.JustUpdateDeviceLine();
return RemoteObject.createImmutable(0);
}
catch (Exception e) {
throw Debug.ErrorCaught(e);
}
finally {
Debug.PopSubsStack();
}}
public static RemoteObject _getvalue(RemoteObject __ref) throws Exception{
try {
Debug.PushSubsStack("getValue (anotherprogressbar) ","anotherprogressbar",10,__ref.getField(false, "ba"),__ref,157);
if (RapidSub.canDelegate("getvalue")) { return __ref.runUserSub(false, "anotherprogressbar","getvalue", __ref);}
BA.debugLineNum = 157;BA.debugLine="Public Sub getValue As Int";
Debug.JustUpdateDeviceLine();
BA.debugLineNum = 158;BA.debugLine="Return mValue";
Debug.JustUpdateDeviceLine();
if (true) return __ref.getField(true,"_mvalue" /*RemoteObject*/ );
BA.debugLineNum = 159;BA.debugLine="End Sub";
Debug.JustUpdateDeviceLine();
return RemoteObject.createImmutable(0);
}
catch (Exception e) {
throw Debug.ErrorCaught(e);
}
finally {
Debug.PopSubsStack();
}}
public static RemoteObject _getvisible(RemoteObject __ref) throws Exception{
try {
Debug.PushSubsStack("getVisible (anotherprogressbar) ","anotherprogressbar",10,__ref.getField(false, "ba"),__ref,153);
if (RapidSub.canDelegate("getvisible")) { return __ref.runUserSub(false, "anotherprogressbar","getvisible", __ref);}
BA.debugLineNum = 153;BA.debugLine="Public Sub getVisible As Boolean";
Debug.JustUpdateDeviceLine();
BA.debugLineNum = 154;BA.debugLine="Return mBase.Visible";
Debug.JustUpdateDeviceLine();
if (true) return __ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getVisible");
BA.debugLineNum = 155;BA.debugLine="End Sub";
Debug.JustUpdateDeviceLine();
return RemoteObject.createImmutable(false);
}
catch (Exception e) {
throw Debug.ErrorCaught(e);
}
finally {
Debug.PopSubsStack();
}}
public static RemoteObject _initialize(RemoteObject __ref,RemoteObject _ba,RemoteObject _callback,RemoteObject _eventname) throws Exception{
try {
Debug.PushSubsStack("Initialize (anotherprogressbar) ","anotherprogressbar",10,__ref.getField(false, "ba"),__ref,26);
if (RapidSub.canDelegate("initialize")) { return __ref.runUserSub(false, "anotherprogressbar","initialize", __ref, _ba, _callback, _eventname);}
__ref.runVoidMethodAndSync("innerInitializeHelper", _ba);
Debug.locals.put("ba", _ba);
Debug.locals.put("Callback", _callback);
Debug.locals.put("EventName", _eventname);
BA.debugLineNum = 26;BA.debugLine="Public Sub Initialize (Callback As Object, EventNa";
Debug.JustUpdateDeviceLine();
BA.debugLineNum = 27;BA.debugLine="mEventName = EventName";
Debug.JustUpdateDeviceLine();
__ref.setField ("_meventname" /*RemoteObject*/ ,_eventname);
BA.debugLineNum = 28;BA.debugLine="mCallBack = Callback";
Debug.JustUpdateDeviceLine();
__ref.setField ("_mcallback" /*RemoteObject*/ ,_callback);
BA.debugLineNum = 29;BA.debugLine="End Sub";
Debug.JustUpdateDeviceLine();
return RemoteObject.createImmutable("");
}
catch (Exception e) {
throw Debug.ErrorCaught(e);
}
finally {
Debug.PopSubsStack();
}}
public static RemoteObject _setprogresscolor(RemoteObject __ref,RemoteObject _c) throws Exception{
try {
Debug.PushSubsStack("setProgressColor (anotherprogressbar) ","anotherprogressbar",10,__ref.getField(false, "ba"),__ref,107);
if (RapidSub.canDelegate("setprogresscolor")) { return __ref.runUserSub(false, "anotherprogressbar","setprogresscolor", __ref, _c);}
Debug.locals.put("c", _c);
BA.debugLineNum = 107;BA.debugLine="Public Sub setProgressColor (c As Int)";
Debug.JustUpdateDeviceLine();
BA.debugLineNum = 108;BA.debugLine="BackgroundColor = c";
Debug.JustUpdateDeviceLine();
__ref.setField ("_backgroundcolor" /*RemoteObject*/ ,_c);
BA.debugLineNum = 109;BA.debugLine="UpdateGraphics";
Debug.JustUpdateDeviceLine();
__ref.runClassMethod (shub.dpm.anotherprogressbar.class, "_updategraphics" /*RemoteObject*/ );
BA.debugLineNum = 110;BA.debugLine="End Sub";
Debug.JustUpdateDeviceLine();
return RemoteObject.createImmutable("");
}
catch (Exception e) {
throw Debug.ErrorCaught(e);
}
finally {
Debug.PopSubsStack();
}}
public static RemoteObject _setvalue(RemoteObject __ref,RemoteObject _v) throws Exception{
try {
Debug.PushSubsStack("setValue (anotherprogressbar) ","anotherprogressbar",10,__ref.getField(false, "ba"),__ref,161);
if (RapidSub.canDelegate("setvalue")) { return __ref.runUserSub(false, "anotherprogressbar","setvalue", __ref, _v);}
Debug.locals.put("v", _v);
BA.debugLineNum = 161;BA.debugLine="Public Sub setValue (v As Int)";
Debug.JustUpdateDeviceLine();
BA.debugLineNum = 162;BA.debugLine="mValue = Max(0, Min(100, v))";
Debug.JustUpdateDeviceLine();
__ref.setField ("_mvalue" /*RemoteObject*/ ,BA.numberCast(int.class, anotherprogressbar.__c.runMethod(true,"Max",(Object)(BA.numberCast(double.class, 0)),(Object)(anotherprogressbar.__c.runMethod(true,"Min",(Object)(BA.numberCast(double.class, 100)),(Object)(BA.numberCast(double.class, _v)))))));
BA.debugLineNum = 163;BA.debugLine="End Sub";
Debug.JustUpdateDeviceLine();
return RemoteObject.createImmutable("");
}
catch (Exception e) {
throw Debug.ErrorCaught(e);
}
finally {
Debug.PopSubsStack();
}}
public static RemoteObject _setvaluenoanimation(RemoteObject __ref,RemoteObject _v) throws Exception{
try {
Debug.PushSubsStack("SetValueNoAnimation (anotherprogressbar) ","anotherprogressbar",10,__ref.getField(false, "ba"),__ref,165);
if (RapidSub.canDelegate("setvaluenoanimation")) { return __ref.runUserSub(false, "anotherprogressbar","setvaluenoanimation", __ref, _v);}
Debug.locals.put("v", _v);
BA.debugLineNum = 165;BA.debugLine="Public Sub SetValueNoAnimation (v As Int)";
Debug.JustUpdateDeviceLine();
BA.debugLineNum = 166;BA.debugLine="setValue(v)";
Debug.JustUpdateDeviceLine();
__ref.runClassMethod (shub.dpm.anotherprogressbar.class, "_setvalue" /*RemoteObject*/ ,(Object)(_v));
BA.debugLineNum = 167;BA.debugLine="CurrentValue = mValue";
Debug.JustUpdateDeviceLine();
__ref.setField ("_currentvalue" /*RemoteObject*/ ,BA.numberCast(float.class, __ref.getField(true,"_mvalue" /*RemoteObject*/ )));
BA.debugLineNum = 168;BA.debugLine="End Sub";
Debug.JustUpdateDeviceLine();
return RemoteObject.createImmutable("");
}
catch (Exception e) {
throw Debug.ErrorCaught(e);
}
finally {
Debug.PopSubsStack();
}}
public static RemoteObject _setvisible(RemoteObject __ref,RemoteObject _b) throws Exception{
try {
Debug.PushSubsStack("setVisible (anotherprogressbar) ","anotherprogressbar",10,__ref.getField(false, "ba"),__ref,145);
if (RapidSub.canDelegate("setvisible")) { return __ref.runUserSub(false, "anotherprogressbar","setvisible", __ref, _b);}
Debug.locals.put("b", _b);
BA.debugLineNum = 145;BA.debugLine="Public Sub setVisible(b As Boolean)";
Debug.JustUpdateDeviceLine();
BA.debugLineNum = 146;BA.debugLine="BusyIndex = BusyIndex + 1";
Debug.JustUpdateDeviceLine();
__ref.setField ("_busyindex" /*RemoteObject*/ ,RemoteObject.solve(new RemoteObject[] {__ref.getField(true,"_busyindex" /*RemoteObject*/ ),RemoteObject.createImmutable(1)}, "+",1, 1));
BA.debugLineNum = 147;BA.debugLine="If b Then";
Debug.JustUpdateDeviceLine();
if (_b.<Boolean>get().booleanValue()) {
BA.debugLineNum = 148;BA.debugLine="BusyLoop";
Debug.JustUpdateDeviceLine();
__ref.runClassMethod (shub.dpm.anotherprogressbar.class, "_busyloop" /*void*/ );
};
BA.debugLineNum = 150;BA.debugLine="mBase.Visible = b";
Debug.JustUpdateDeviceLine();
__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"setVisible",_b);
BA.debugLineNum = 151;BA.debugLine="End Sub";
Debug.JustUpdateDeviceLine();
return RemoteObject.createImmutable("");
}
catch (Exception e) {
throw Debug.ErrorCaught(e);
}
finally {
Debug.PopSubsStack();
}}
public static RemoteObject _updategraphics(RemoteObject __ref) throws Exception{
try {
Debug.PushSubsStack("UpdateGraphics (anotherprogressbar) ","anotherprogressbar",10,__ref.getField(false, "ba"),__ref,112);
if (RapidSub.canDelegate("updategraphics")) { return __ref.runUserSub(false, "anotherprogressbar","updategraphics", __ref);}
RemoteObject _width = RemoteObject.createImmutable(0);
RemoteObject _template = RemoteObject.declareNull("b4a.example.bitmapcreator");
RemoteObject _bcolor = RemoteObject.declareNull("b4a.example.bitmapcreator._argbcolor");
BA.debugLineNum = 112;BA.debugLine="Public Sub UpdateGraphics";
Debug.JustUpdateDeviceLine();
BA.debugLineNum = 113;BA.debugLine="EmptyBrush = bc.CreateBrushFromColor(EmptyColor)";
Debug.JustUpdateDeviceLine();
__ref.setField ("_emptybrush" /*RemoteObject*/ ,__ref.getField(false,"_bc" /*RemoteObject*/ ).runMethod(false,"_createbrushfromcolor",(Object)(__ref.getField(true,"_emptycolor" /*RemoteObject*/ ))));
BA.debugLineNum = 114;BA.debugLine="TransparentBrush = bc.CreateBrushFromColor(xui.Co";
Debug.JustUpdateDeviceLine();
__ref.setField ("_transparentbrush" /*RemoteObject*/ ,__ref.getField(false,"_bc" /*RemoteObject*/ ).runMethod(false,"_createbrushfromcolor",(Object)(__ref.getField(false,"_xui" /*RemoteObject*/ ).getField(true,"Color_Transparent"))));
BA.debugLineNum = 115;BA.debugLine="Dim Width As Int = 40";
Debug.JustUpdateDeviceLine();
_width = BA.numberCast(int.class, 40);Debug.locals.put("Width", _width);Debug.locals.put("Width", _width);
BA.debugLineNum = 116;BA.debugLine="Dim Template As BitmapCreator";
Debug.JustUpdateDeviceLine();
_template = RemoteObject.createNew ("b4a.example.bitmapcreator");Debug.locals.put("Template", _template);
BA.debugLineNum = 117;BA.debugLine="Dim bcolor As ARGBColor";
Debug.JustUpdateDeviceLine();
_bcolor = RemoteObject.createNew ("b4a.example.bitmapcreator._argbcolor");Debug.locals.put("bcolor", _bcolor);
BA.debugLineNum = 118;BA.debugLine="bc.ColorToARGB(BackgroundColor, bcolor)";
Debug.JustUpdateDeviceLine();
__ref.getField(false,"_bc" /*RemoteObject*/ ).runVoidMethod ("_colortoargb",(Object)(__ref.getField(true,"_backgroundcolor" /*RemoteObject*/ )),(Object)(_bcolor));
BA.debugLineNum = 119;BA.debugLine="bcolor.r = Min(255, bcolor.r * 1.5)";
Debug.JustUpdateDeviceLine();
_bcolor.setField ("r",BA.numberCast(int.class, anotherprogressbar.__c.runMethod(true,"Min",(Object)(BA.numberCast(double.class, 255)),(Object)(RemoteObject.solve(new RemoteObject[] {_bcolor.getField(true,"r"),RemoteObject.createImmutable(1.5)}, "*",0, 0)))));
BA.debugLineNum = 120;BA.debugLine="bcolor.g = Min(255, bcolor.g * 1.5)";
Debug.JustUpdateDeviceLine();
_bcolor.setField ("g",BA.numberCast(int.class, anotherprogressbar.__c.runMethod(true,"Min",(Object)(BA.numberCast(double.class, 255)),(Object)(RemoteObject.solve(new RemoteObject[] {_bcolor.getField(true,"g"),RemoteObject.createImmutable(1.5)}, "*",0, 0)))));
BA.debugLineNum = 121;BA.debugLine="bcolor.b = Min(255, bcolor.b * 1.5)";
Debug.JustUpdateDeviceLine();
_bcolor.setField ("b",BA.numberCast(int.class, anotherprogressbar.__c.runMethod(true,"Min",(Object)(BA.numberCast(double.class, 255)),(Object)(RemoteObject.solve(new RemoteObject[] {_bcolor.getField(true,"b"),RemoteObject.createImmutable(1.5)}, "*",0, 0)))));
BA.debugLineNum = 122;BA.debugLine="If Vertical Then";
Debug.JustUpdateDeviceLine();
if (__ref.getField(true,"_vertical" /*RemoteObject*/ ).<Boolean>get().booleanValue()) {
BA.debugLineNum = 123;BA.debugLine="Template.Initialize(mBase.Width / xui.Scale, mBa";
Debug.JustUpdateDeviceLine();
_template.runVoidMethod ("_initialize",__ref.getField(false, "ba"),(Object)(BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getWidth"),__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"getScale")}, "/",0, 0))),(Object)(BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getWidth"),__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"getScale"),_width}, "/+",1, 0))));
}else {
BA.debugLineNum = 125;BA.debugLine="Template.Initialize(mBase.Height / xui.Scale + W";
Debug.JustUpdateDeviceLine();
_template.runVoidMethod ("_initialize",__ref.getField(false, "ba"),(Object)(BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getHeight"),__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"getScale"),_width}, "/+",1, 0))),(Object)(BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getHeight"),__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"getScale")}, "/",0, 0))));
};
BA.debugLineNum = 128;BA.debugLine="Template.DrawRect(Template.TargetRect, Background";
Debug.JustUpdateDeviceLine();
_template.runVoidMethod ("_drawrect",(Object)(_template.getField(false,"_targetrect")),(Object)(__ref.getField(true,"_backgroundcolor" /*RemoteObject*/ )),(Object)(anotherprogressbar.__c.getField(true,"True")),(Object)(BA.numberCast(int.class, 0)));
BA.debugLineNum = 129;BA.debugLine="If Vertical Then";
Debug.JustUpdateDeviceLine();
if (__ref.getField(true,"_vertical" /*RemoteObject*/ ).<Boolean>get().booleanValue()) {
BA.debugLineNum = 130;BA.debugLine="Template.DrawLine(-Width / 2, Width / 2, Templat";
Debug.JustUpdateDeviceLine();
_template.runVoidMethod ("_drawline",(Object)(BA.numberCast(float.class, -(double) (0 + _width.<Integer>get().intValue())/(double)(double) (0 + 2))),(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {_width,RemoteObject.createImmutable(2)}, "/",0, 0))),(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {_template.getField(true,"_mwidth"),_width,RemoteObject.createImmutable(2)}, "+/",1, 0))),(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {_template.getField(true,"_mheight"),_width,RemoteObject.createImmutable(2)}, "-/",1, 0))),(Object)(__ref.getField(false,"_bc" /*RemoteObject*/ ).runMethod(true,"_argbtocolor",(Object)(_bcolor))),(Object)(_width));
}else {
BA.debugLineNum = 132;BA.debugLine="Template.DrawLine(Width / 2, -Width / 2, Templat";
Debug.JustUpdateDeviceLine();
_template.runVoidMethod ("_drawline",(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {_width,RemoteObject.createImmutable(2)}, "/",0, 0))),(Object)(BA.numberCast(float.class, -(double) (0 + _width.<Integer>get().intValue())/(double)(double) (0 + 2))),(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {_template.getField(true,"_mwidth"),_width,RemoteObject.createImmutable(2)}, "-/",1, 0))),(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {_template.getField(true,"_mheight"),_width,RemoteObject.createImmutable(2)}, "+/",1, 0))),(Object)(__ref.getField(false,"_bc" /*RemoteObject*/ ).runMethod(true,"_argbtocolor",(Object)(_bcolor))),(Object)(_width));
};
BA.debugLineNum = 134;BA.debugLine="BusyBrush = bc.CreateBrushFromBitmapCreator(Templ";
Debug.JustUpdateDeviceLine();
__ref.setField ("_busybrush" /*RemoteObject*/ ,__ref.getField(false,"_bc" /*RemoteObject*/ ).runMethod(false,"_createbrushfrombitmapcreator",(Object)(_template)));
BA.debugLineNum = 135;BA.debugLine="If mValue = 100 Then";
Debug.JustUpdateDeviceLine();
if (RemoteObject.solveBoolean("=",__ref.getField(true,"_mvalue" /*RemoteObject*/ ),BA.numberCast(double.class, 100))) {
BA.debugLineNum = 136;BA.debugLine="bc.DrawRectRounded(bc.TargetRect, BackgroundColo";
Debug.JustUpdateDeviceLine();
__ref.getField(false,"_bc" /*RemoteObject*/ ).runVoidMethod ("_drawrectrounded",(Object)(__ref.getField(false,"_bc" /*RemoteObject*/ ).getField(false,"_targetrect")),(Object)(__ref.getField(true,"_backgroundcolor" /*RemoteObject*/ )),(Object)(anotherprogressbar.__c.getField(true,"True")),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 15)));
}else {
BA.debugLineNum = 138;BA.debugLine="bc.DrawRectRounded2(bc.TargetRect, EmptyBrush, T";
Debug.JustUpdateDeviceLine();
__ref.getField(false,"_bc" /*RemoteObject*/ ).runVoidMethod ("_drawrectrounded2",(Object)(__ref.getField(false,"_bc" /*RemoteObject*/ ).getField(false,"_targetrect")),(Object)(__ref.getField(false,"_emptybrush" /*RemoteObject*/ )),(Object)(anotherprogressbar.__c.getField(true,"True")),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 15)));
};
BA.debugLineNum = 140;BA.debugLine="bc.SetBitmapToImageView(bc.Bitmap, mIV)";
Debug.JustUpdateDeviceLine();
__ref.getField(false,"_bc" /*RemoteObject*/ ).runVoidMethod ("_setbitmaptoimageview",(Object)(__ref.getField(false,"_bc" /*RemoteObject*/ ).runMethod(false,"_getbitmap")),(Object)(__ref.getField(false,"_miv" /*RemoteObject*/ )));
BA.debugLineNum = 141;BA.debugLine="setVisible(mBase.Visible)";
Debug.JustUpdateDeviceLine();
__ref.runClassMethod (shub.dpm.anotherprogressbar.class, "_setvisible" /*RemoteObject*/ ,(Object)(__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getVisible")));
BA.debugLineNum = 142;BA.debugLine="End Sub";
Debug.JustUpdateDeviceLine();
return RemoteObject.createImmutable("");
}
catch (Exception e) {
throw Debug.ErrorCaught(e);
}
finally {
Debug.PopSubsStack();
}}
}

View File

@@ -0,0 +1,85 @@
package shub.dpm;
import java.io.IOException;
import anywheresoftware.b4a.BA;
import anywheresoftware.b4a.pc.PCBA;
import anywheresoftware.b4a.pc.RDebug;
import anywheresoftware.b4a.pc.RemoteObject;
import anywheresoftware.b4a.pc.RDebug.IRemote;
import anywheresoftware.b4a.pc.Debug;
import anywheresoftware.b4a.pc.B4XTypes.B4XClass;
import anywheresoftware.b4a.pc.B4XTypes.DeviceClass;
public class appmain implements IRemote{
public static appmain mostCurrent;
public static RemoteObject processBA;
public static boolean processGlobalsRun;
public static RemoteObject myClass;
public static RemoteObject remoteMe;
public appmain() {
mostCurrent = this;
}
public RemoteObject getRemoteMe() {
return remoteMe;
}
public static void main (String[] args) throws Exception {
new RDebug(args[0], Integer.parseInt(args[1]), Integer.parseInt(args[2]), args[3]);
RDebug.INSTANCE.waitForTask();
}
static {
anywheresoftware.b4a.pc.RapidSub.moduleToObject.put(new B4XClass("appmain"), "shub.dpm.appmain");
}
public boolean isSingleton() {
return true;
}
public static RemoteObject getObject() {
return myClass;
}
public RemoteObject activityBA;
public RemoteObject _activity;
private PCBA pcBA;
public PCBA create(Object[] args) throws ClassNotFoundException{
processBA = (RemoteObject) args[1];
activityBA = (RemoteObject) args[2];
_activity = (RemoteObject) args[3];
anywheresoftware.b4a.keywords.Common.Density = (Float)args[4];
remoteMe = (RemoteObject) args[5];
pcBA = new PCBA(this, appmain.class);
main_subs_0.initializeProcessGlobals();
return pcBA;
}
public static RemoteObject __c = RemoteObject.declareNull("anywheresoftware.b4a.keywords.Common");
public static RemoteObject _patid = RemoteObject.createImmutable("");
public static RemoteObject _surl = RemoteObject.createImmutable("");
public static RemoteObject _bs1 = RemoteObject.declareNull("billwrapper.billWrapper");
public static RemoteObject _button1 = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper");
public static RemoteObject _button2 = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper");
public static RemoteObject _jobname = RemoteObject.createImmutable("");
public static RemoteObject _patname = RemoteObject.createImmutable("");
public static RemoteObject _txtpatnr = RemoteObject.declareNull("anywheresoftware.b4a.objects.EditTextWrapper");
public static RemoteObject _pnlenterpatid = RemoteObject.declareNull("anywheresoftware.b4a.objects.PanelWrapper");
public static RemoteObject _lblpatient = RemoteObject.declareNull("anywheresoftware.b4a.objects.LabelWrapper");
public static RemoteObject _timeout = RemoteObject.createImmutable(0L);
public static RemoteObject _dtnow = RemoteObject.createImmutable(0L);
public static RemoteObject _btnsearchpat = RemoteObject.declareNull("anywheresoftware.b4a.objects.ButtonWrapper");
public static RemoteObject _pattimer = RemoteObject.declareNull("anywheresoftware.b4a.objects.Timer");
public static RemoteObject _starttimer = RemoteObject.declareNull("anywheresoftware.b4a.objects.Timer");
public static RemoteObject _dateutils = RemoteObject.declareNull("b4a.example.dateutils");
public static shub.dpm.main _main = null;
public static shub.dpm.listdata _listdata = null;
public static shub.dpm.param _param = null;
public static shub.dpm.starter _starter = null;
public static shub.dpm.tempdata _tempdata = null;
public static shub.dpm.about _about = null;
public static shub.dpm.httputils2service _httputils2service = null;
public static shub.dpm.xuiviewsutils _xuiviewsutils = null;
public Object[] GetGlobals() {
return new Object[] {"About",Debug.moduleToString(shub.dpm.about.class),"Activity",appmain.mostCurrent._activity,"bs1",appmain.mostCurrent._bs1,"btnSearchPat",appmain.mostCurrent._btnsearchpat,"Button1",appmain.mostCurrent._button1,"Button2",appmain.mostCurrent._button2,"DateUtils",appmain.mostCurrent._dateutils,"dtnow",appmain._dtnow,"HttpUtils2Service",Debug.moduleToString(shub.dpm.httputils2service.class),"JobName",appmain.mostCurrent._jobname,"lblPatient",appmain.mostCurrent._lblpatient,"ListData",Debug.moduleToString(shub.dpm.listdata.class),"Main",Debug.moduleToString(shub.dpm.main.class),"Param",Debug.moduleToString(shub.dpm.param.class),"PatID",appmain._patid,"PatName",appmain.mostCurrent._patname,"PatTimer",appmain.mostCurrent._pattimer,"pnlEnterPatID",appmain.mostCurrent._pnlenterpatid,"Starter",Debug.moduleToString(shub.dpm.starter.class),"StartTimer",appmain.mostCurrent._starttimer,"sURL",appmain._surl,"TempData",Debug.moduleToString(shub.dpm.tempdata.class),"timeout",appmain._timeout,"txtPatNr",appmain.mostCurrent._txtpatnr,"XUIViewsUtils",Debug.moduleToString(shub.dpm.xuiviewsutils.class)};
}
}

View File

@@ -0,0 +1,694 @@
package shub.dpm;
import anywheresoftware.b4a.BA;
import anywheresoftware.b4a.pc.*;
public class appmain_subs_0 {
public static RemoteObject _activity_create(RemoteObject _firsttime) throws Exception{
try {
Debug.PushSubsStack("Activity_Create (appmain) ","appmain",6,appmain.mostCurrent.activityBA,appmain.mostCurrent,37);
if (RapidSub.canDelegate("activity_create")) { return shub.dpm.appmain.remoteMe.runUserSub(false, "appmain","activity_create", _firsttime);}
Debug.locals.put("FirstTime", _firsttime);
BA.debugLineNum = 37;BA.debugLine="Sub Activity_Create(FirstTime As Boolean)";
Debug.ShouldStop(16);
BA.debugLineNum = 39;BA.debugLine="Activity.AddMenuItem(\"Parameter\",\"bt1\")";
Debug.ShouldStop(64);
appmain.mostCurrent._activity.runVoidMethod ("AddMenuItem",(Object)(BA.ObjectToCharSequence("Parameter")),(Object)(RemoteObject.createImmutable("bt1")));
BA.debugLineNum = 40;BA.debugLine="Activity.AddMenuItem(\"Über...\",\"bt2\")";
Debug.ShouldStop(128);
appmain.mostCurrent._activity.runVoidMethod ("AddMenuItem",(Object)(BA.ObjectToCharSequence("Über...")),(Object)(RemoteObject.createImmutable("bt2")));
BA.debugLineNum = 42;BA.debugLine="Activity.LoadLayout(\"main\")";
Debug.ShouldStop(512);
appmain.mostCurrent._activity.runMethodAndSync(false,"LoadLayout",(Object)(RemoteObject.createImmutable("main")),appmain.mostCurrent.activityBA);
BA.debugLineNum = 43;BA.debugLine="Activity.Title=\"DPM - Charge Scanner\"";
Debug.ShouldStop(1024);
appmain.mostCurrent._activity.runMethod(false,"setTitle",BA.ObjectToCharSequence("DPM - Charge Scanner"));
BA.debugLineNum = 44;BA.debugLine="bs1.ScanMode = bs1.FORMAT_ONE_D";
Debug.ShouldStop(2048);
appmain.mostCurrent._bs1.runVoidMethod ("setScanMode",appmain.mostCurrent._bs1.getField(true,"FORMAT_ONE_D"));
BA.debugLineNum = 45;BA.debugLine="PatID=0";
Debug.ShouldStop(4096);
appmain._patid = BA.NumberToString(0);
BA.debugLineNum = 46;BA.debugLine="If File.Exists(File.DirInternal ,\"DPM.ini\") = Tru";
Debug.ShouldStop(8192);
if (RemoteObject.solveBoolean("=",appmain.mostCurrent.__c.getField(false,"File").runMethod(true,"Exists",(Object)(appmain.mostCurrent.__c.getField(false,"File").runMethod(true,"getDirInternal")),(Object)(RemoteObject.createImmutable("DPM.ini"))),appmain.mostCurrent.__c.getField(true,"True"))) {
BA.debugLineNum = 47;BA.debugLine="Get_Params";
Debug.ShouldStop(16384);
_get_params();
}else {
};
BA.debugLineNum = 51;BA.debugLine="PatTimer.Initialize(\"timer\",timeout)";
Debug.ShouldStop(262144);
appmain.mostCurrent._pattimer.runVoidMethod ("Initialize",appmain.processBA,(Object)(BA.ObjectToString("timer")),(Object)(appmain._timeout));
BA.debugLineNum = 52;BA.debugLine="If TempData.pid<>\"\" Then";
Debug.ShouldStop(524288);
if (RemoteObject.solveBoolean("!",appmain.mostCurrent._tempdata._pid /*RemoteObject*/ ,BA.ObjectToString(""))) {
BA.debugLineNum = 53;BA.debugLine="get_Pat(TempData.pid)";
Debug.ShouldStop(1048576);
_get_pat(appmain.mostCurrent._tempdata._pid /*RemoteObject*/ );
BA.debugLineNum = 54;BA.debugLine="TempData.pid=\"\"";
Debug.ShouldStop(2097152);
appmain.mostCurrent._tempdata._pid /*RemoteObject*/ = BA.ObjectToString("");
};
BA.debugLineNum = 56;BA.debugLine="End Sub";
Debug.ShouldStop(8388608);
return RemoteObject.createImmutable("");
}
catch (Exception e) {
throw Debug.ErrorCaught(e);
}
finally {
Debug.PopSubsStack();
}}
public static RemoteObject _activity_pause(RemoteObject _userclosed) throws Exception{
try {
Debug.PushSubsStack("Activity_Pause (appmain) ","appmain",6,appmain.mostCurrent.activityBA,appmain.mostCurrent,68);
if (RapidSub.canDelegate("activity_pause")) { return shub.dpm.appmain.remoteMe.runUserSub(false, "appmain","activity_pause", _userclosed);}
Debug.locals.put("UserClosed", _userclosed);
BA.debugLineNum = 68;BA.debugLine="Sub Activity_Pause (UserClosed As Boolean)";
Debug.ShouldStop(8);
BA.debugLineNum = 70;BA.debugLine="Try";
Debug.ShouldStop(32);
try { BA.debugLineNum = 71;BA.debugLine="bs1.stopScanning";
Debug.ShouldStop(64);
appmain.mostCurrent._bs1.runVoidMethod ("stopScanning");
Debug.CheckDeviceExceptions();
}
catch (Exception e4) {
BA.rdebugUtils.runVoidMethod("setLastException",appmain.processBA, e4.toString()); };
BA.debugLineNum = 74;BA.debugLine="PatID=0";
Debug.ShouldStop(512);
appmain._patid = BA.NumberToString(0);
BA.debugLineNum = 75;BA.debugLine="End Sub";
Debug.ShouldStop(1024);
return RemoteObject.createImmutable("");
}
catch (Exception e) {
throw Debug.ErrorCaught(e);
}
finally {
Debug.PopSubsStack();
}}
public static RemoteObject _activity_resume() throws Exception{
try {
Debug.PushSubsStack("Activity_Resume (appmain) ","appmain",6,appmain.mostCurrent.activityBA,appmain.mostCurrent,58);
if (RapidSub.canDelegate("activity_resume")) { return shub.dpm.appmain.remoteMe.runUserSub(false, "appmain","activity_resume");}
BA.debugLineNum = 58;BA.debugLine="Sub Activity_Resume";
Debug.ShouldStop(33554432);
BA.debugLineNum = 59;BA.debugLine="If TempData.pid<>\"\" Then PatID=TempData.pid";
Debug.ShouldStop(67108864);
if (RemoteObject.solveBoolean("!",appmain.mostCurrent._tempdata._pid /*RemoteObject*/ ,BA.ObjectToString(""))) {
appmain._patid = appmain.mostCurrent._tempdata._pid /*RemoteObject*/ ;};
BA.debugLineNum = 60;BA.debugLine="If File.Exists(File.DirInternal ,\"DPM.ini\") = Tru";
Debug.ShouldStop(134217728);
if (RemoteObject.solveBoolean("=",appmain.mostCurrent.__c.getField(false,"File").runMethod(true,"Exists",(Object)(appmain.mostCurrent.__c.getField(false,"File").runMethod(true,"getDirInternal")),(Object)(RemoteObject.createImmutable("DPM.ini"))),appmain.mostCurrent.__c.getField(true,"True"))) {
BA.debugLineNum = 61;BA.debugLine="Get_Params";
Debug.ShouldStop(268435456);
_get_params();
BA.debugLineNum = 62;BA.debugLine="PatTimer.Enabled=False";
Debug.ShouldStop(536870912);
appmain.mostCurrent._pattimer.runMethod(true,"setEnabled",appmain.mostCurrent.__c.getField(true,"False"));
BA.debugLineNum = 63;BA.debugLine="PatTimer.Initialize(\"timer\",timeout)";
Debug.ShouldStop(1073741824);
appmain.mostCurrent._pattimer.runVoidMethod ("Initialize",appmain.processBA,(Object)(BA.ObjectToString("timer")),(Object)(appmain._timeout));
BA.debugLineNum = 64;BA.debugLine="PatTimer.Enabled=True";
Debug.ShouldStop(-2147483648);
appmain.mostCurrent._pattimer.runMethod(true,"setEnabled",appmain.mostCurrent.__c.getField(true,"True"));
};
BA.debugLineNum = 66;BA.debugLine="End Sub";
Debug.ShouldStop(2);
return RemoteObject.createImmutable("");
}
catch (Exception e) {
throw Debug.ErrorCaught(e);
}
finally {
Debug.PopSubsStack();
}}
public static RemoteObject _bs1_scan_value(RemoteObject _val,RemoteObject _rawbyte,RemoteObject _barcodetype) throws Exception{
try {
Debug.PushSubsStack("bs1_scan_value (appmain) ","appmain",6,appmain.mostCurrent.activityBA,appmain.mostCurrent,122);
if (RapidSub.canDelegate("bs1_scan_value")) { return shub.dpm.appmain.remoteMe.runUserSub(false, "appmain","bs1_scan_value", _val, _rawbyte, _barcodetype);}
RemoteObject _job = RemoteObject.declareNull("shub.dpm.httpjob");
RemoteObject _b = RemoteObject.declareNull("anywheresoftware.b4a.audio.Beeper");
Debug.locals.put("val", _val);
Debug.locals.put("rawbyte", _rawbyte);
Debug.locals.put("barcodetype", _barcodetype);
BA.debugLineNum = 122;BA.debugLine="Sub bs1_scan_value(val As String, rawbyte() As Byt";
Debug.ShouldStop(33554432);
BA.debugLineNum = 127;BA.debugLine="If DateDiff(\"ss\",dtnow,DateTime.Now)<2 Then Retur";
Debug.ShouldStop(1073741824);
if (RemoteObject.solveBoolean("<",BA.numberCast(double.class, _datediff(BA.ObjectToString("ss"),BA.NumberToString(appmain._dtnow),BA.NumberToString(appmain.mostCurrent.__c.getField(false,"DateTime").runMethod(true,"getNow")))),BA.numberCast(double.class, 2))) {
if (true) return RemoteObject.createImmutable("");};
BA.debugLineNum = 128;BA.debugLine="Dim job As HttpJob";
Debug.ShouldStop(-2147483648);
_job = RemoteObject.createNew ("shub.dpm.httpjob");Debug.locals.put("job", _job);
BA.debugLineNum = 129;BA.debugLine="JobName=\"PostCharche\"";
Debug.ShouldStop(1);
appmain.mostCurrent._jobname = BA.ObjectToString("PostCharche");
BA.debugLineNum = 130;BA.debugLine="job.Initialize(JobName, Me)";
Debug.ShouldStop(2);
_job.runClassMethod (shub.dpm.httpjob.class, "_initialize" /*RemoteObject*/ ,appmain.processBA,(Object)(appmain.mostCurrent._jobname),(Object)(appmain.getObject()));
BA.debugLineNum = 132;BA.debugLine="dtnow=DateTime.Now";
Debug.ShouldStop(8);
appmain._dtnow = appmain.mostCurrent.__c.getField(false,"DateTime").runMethod(true,"getNow");
BA.debugLineNum = 133;BA.debugLine="job.PostString(sURL&\"/DPMService/api/PatCharge/\"&";
Debug.ShouldStop(16);
_job.runClassMethod (shub.dpm.httpjob.class, "_poststring" /*RemoteObject*/ ,(Object)(RemoteObject.concat(appmain._surl,RemoteObject.createImmutable("/DPMService/api/PatCharge/"),appmain._patid,RemoteObject.createImmutable("/"),_val)),(Object)(RemoteObject.createImmutable("")));
BA.debugLineNum = 135;BA.debugLine="Dim b As Beeper";
Debug.ShouldStop(64);
_b = RemoteObject.createNew ("anywheresoftware.b4a.audio.Beeper");Debug.locals.put("b", _b);
BA.debugLineNum = 136;BA.debugLine="b.Initialize(300, 500) '300 milliseconds, 500 hz";
Debug.ShouldStop(128);
_b.runVoidMethod ("Initialize",(Object)(BA.numberCast(int.class, 300)),(Object)(BA.numberCast(int.class, 500)));
BA.debugLineNum = 138;BA.debugLine="PatTimer.Enabled=True";
Debug.ShouldStop(512);
appmain.mostCurrent._pattimer.runMethod(true,"setEnabled",appmain.mostCurrent.__c.getField(true,"True"));
BA.debugLineNum = 140;BA.debugLine="End Sub";
Debug.ShouldStop(2048);
return RemoteObject.createImmutable("");
}
catch (Exception e) {
throw Debug.ErrorCaught(e);
}
finally {
Debug.PopSubsStack();
}}
public static RemoteObject _bt1_click() throws Exception{
try {
Debug.PushSubsStack("bt1_Click (appmain) ","appmain",6,appmain.mostCurrent.activityBA,appmain.mostCurrent,228);
if (RapidSub.canDelegate("bt1_click")) { return shub.dpm.appmain.remoteMe.runUserSub(false, "appmain","bt1_click");}
BA.debugLineNum = 228;BA.debugLine="Sub bt1_Click";
Debug.ShouldStop(8);
BA.debugLineNum = 229;BA.debugLine="StartActivity(\"Param\")";
Debug.ShouldStop(16);
appmain.mostCurrent.__c.runVoidMethod ("StartActivity",appmain.processBA,(Object)((RemoteObject.createImmutable("Param"))));
BA.debugLineNum = 230;BA.debugLine="End Sub";
Debug.ShouldStop(32);
return RemoteObject.createImmutable("");
}
catch (Exception e) {
throw Debug.ErrorCaught(e);
}
finally {
Debug.PopSubsStack();
}}
public static RemoteObject _bt2_click() throws Exception{
try {
Debug.PushSubsStack("bt2_click (appmain) ","appmain",6,appmain.mostCurrent.activityBA,appmain.mostCurrent,231);
if (RapidSub.canDelegate("bt2_click")) { return shub.dpm.appmain.remoteMe.runUserSub(false, "appmain","bt2_click");}
BA.debugLineNum = 231;BA.debugLine="Sub bt2_click";
Debug.ShouldStop(64);
BA.debugLineNum = 232;BA.debugLine="StartActivity(\"About\")";
Debug.ShouldStop(128);
appmain.mostCurrent.__c.runVoidMethod ("StartActivity",appmain.processBA,(Object)((RemoteObject.createImmutable("About"))));
BA.debugLineNum = 233;BA.debugLine="End Sub";
Debug.ShouldStop(256);
return RemoteObject.createImmutable("");
}
catch (Exception e) {
throw Debug.ErrorCaught(e);
}
finally {
Debug.PopSubsStack();
}}
public static RemoteObject _btnenterpatid_click() throws Exception{
try {
Debug.PushSubsStack("btnEnterPatID_Click (appmain) ","appmain",6,appmain.mostCurrent.activityBA,appmain.mostCurrent,217);
if (RapidSub.canDelegate("btnenterpatid_click")) { return shub.dpm.appmain.remoteMe.runUserSub(false, "appmain","btnenterpatid_click");}
BA.debugLineNum = 217;BA.debugLine="Private Sub btnEnterPatID_Click";
Debug.ShouldStop(16777216);
BA.debugLineNum = 218;BA.debugLine="txtPatNr.ForceDoneButton=True";
Debug.ShouldStop(33554432);
appmain.mostCurrent._txtpatnr.runVoidMethod ("setForceDoneButton",appmain.mostCurrent.__c.getField(true,"True"));
BA.debugLineNum = 219;BA.debugLine="pnlEnterPatID.Visible=True";
Debug.ShouldStop(67108864);
appmain.mostCurrent._pnlenterpatid.runMethod(true,"setVisible",appmain.mostCurrent.__c.getField(true,"True"));
BA.debugLineNum = 220;BA.debugLine="txtPatNr.Text=\"\"";
Debug.ShouldStop(134217728);
appmain.mostCurrent._txtpatnr.runMethodAndSync(true,"setText",BA.ObjectToCharSequence(""));
BA.debugLineNum = 221;BA.debugLine="txtPatNr.RequestFocus";
Debug.ShouldStop(268435456);
appmain.mostCurrent._txtpatnr.runVoidMethod ("RequestFocus");
BA.debugLineNum = 222;BA.debugLine="End Sub";
Debug.ShouldStop(536870912);
return RemoteObject.createImmutable("");
}
catch (Exception e) {
throw Debug.ErrorCaught(e);
}
finally {
Debug.PopSubsStack();
}}
public static RemoteObject _btnlistdata_click() throws Exception{
try {
Debug.PushSubsStack("btnListdata_Click (appmain) ","appmain",6,appmain.mostCurrent.activityBA,appmain.mostCurrent,235);
if (RapidSub.canDelegate("btnlistdata_click")) { return shub.dpm.appmain.remoteMe.runUserSub(false, "appmain","btnlistdata_click");}
BA.debugLineNum = 235;BA.debugLine="Private Sub btnListdata_Click";
Debug.ShouldStop(1024);
BA.debugLineNum = 239;BA.debugLine="ListData.PatID=PatID";
Debug.ShouldStop(16384);
appmain.mostCurrent._listdata._patid /*RemoteObject*/ = appmain._patid;
BA.debugLineNum = 240;BA.debugLine="TempData.pid=PatID";
Debug.ShouldStop(32768);
appmain.mostCurrent._tempdata._pid /*RemoteObject*/ = appmain._patid;
BA.debugLineNum = 241;BA.debugLine="TempData.pname=lblPatient.Text";
Debug.ShouldStop(65536);
appmain.mostCurrent._tempdata._pname /*RemoteObject*/ = appmain.mostCurrent._lblpatient.runMethod(true,"getText");
BA.debugLineNum = 242;BA.debugLine="ListData.sURL=sURL";
Debug.ShouldStop(131072);
appmain.mostCurrent._listdata._surl /*RemoteObject*/ = appmain._surl;
BA.debugLineNum = 245;BA.debugLine="StartActivity(\"ListData\")";
Debug.ShouldStop(1048576);
appmain.mostCurrent.__c.runVoidMethod ("StartActivity",appmain.processBA,(Object)((RemoteObject.createImmutable("ListData"))));
BA.debugLineNum = 246;BA.debugLine="End Sub";
Debug.ShouldStop(2097152);
return RemoteObject.createImmutable("");
}
catch (Exception e) {
throw Debug.ErrorCaught(e);
}
finally {
Debug.PopSubsStack();
}}
public static RemoteObject _btnsearchpat_click() throws Exception{
try {
Debug.PushSubsStack("btnSearchPat_Click (appmain) ","appmain",6,appmain.mostCurrent.activityBA,appmain.mostCurrent,209);
if (RapidSub.canDelegate("btnsearchpat_click")) { return shub.dpm.appmain.remoteMe.runUserSub(false, "appmain","btnsearchpat_click");}
BA.debugLineNum = 209;BA.debugLine="Private Sub btnSearchPat_Click";
Debug.ShouldStop(65536);
BA.debugLineNum = 210;BA.debugLine="PatTimer.Enabled=False";
Debug.ShouldStop(131072);
appmain.mostCurrent._pattimer.runMethod(true,"setEnabled",appmain.mostCurrent.__c.getField(true,"False"));
BA.debugLineNum = 211;BA.debugLine="get_Pat(txtPatNr.Text)";
Debug.ShouldStop(262144);
_get_pat(appmain.mostCurrent._txtpatnr.runMethod(true,"getText"));
BA.debugLineNum = 212;BA.debugLine="pnlEnterPatID.Visible=False";
Debug.ShouldStop(524288);
appmain.mostCurrent._pnlenterpatid.runMethod(true,"setVisible",appmain.mostCurrent.__c.getField(true,"False"));
BA.debugLineNum = 213;BA.debugLine="btnSearchPat.RequestFocus";
Debug.ShouldStop(1048576);
appmain.mostCurrent._btnsearchpat.runVoidMethod ("RequestFocus");
BA.debugLineNum = 214;BA.debugLine="PatTimer.Enabled=True";
Debug.ShouldStop(2097152);
appmain.mostCurrent._pattimer.runMethod(true,"setEnabled",appmain.mostCurrent.__c.getField(true,"True"));
BA.debugLineNum = 215;BA.debugLine="End Sub";
Debug.ShouldStop(4194304);
return RemoteObject.createImmutable("");
}
catch (Exception e) {
throw Debug.ErrorCaught(e);
}
finally {
Debug.PopSubsStack();
}}
public static RemoteObject _button1_click() throws Exception{
try {
Debug.PushSubsStack("Button1_Click (appmain) ","appmain",6,appmain.mostCurrent.activityBA,appmain.mostCurrent,142);
if (RapidSub.canDelegate("button1_click")) { return shub.dpm.appmain.remoteMe.runUserSub(false, "appmain","button1_click");}
BA.debugLineNum = 142;BA.debugLine="Sub Button1_Click";
Debug.ShouldStop(8192);
BA.debugLineNum = 143;BA.debugLine="If PatID=0 Then";
Debug.ShouldStop(16384);
if (RemoteObject.solveBoolean("=",appmain._patid,BA.NumberToString(0))) {
BA.debugLineNum = 144;BA.debugLine="ToastMessageShow(\"Bitte zuerst Patient wählen\",T";
Debug.ShouldStop(32768);
appmain.mostCurrent.__c.runVoidMethod ("ToastMessageShow",(Object)(BA.ObjectToCharSequence("Bitte zuerst Patient wählen")),(Object)(appmain.mostCurrent.__c.getField(true,"True")));
};
BA.debugLineNum = 146;BA.debugLine="bs1.startScanning";
Debug.ShouldStop(131072);
appmain.mostCurrent._bs1.runVoidMethod ("startScanning");
BA.debugLineNum = 147;BA.debugLine="PatTimer.Enabled=False";
Debug.ShouldStop(262144);
appmain.mostCurrent._pattimer.runMethod(true,"setEnabled",appmain.mostCurrent.__c.getField(true,"False"));
BA.debugLineNum = 148;BA.debugLine="End Sub";
Debug.ShouldStop(524288);
return RemoteObject.createImmutable("");
}
catch (Exception e) {
throw Debug.ErrorCaught(e);
}
finally {
Debug.PopSubsStack();
}}
public static RemoteObject _button2_click() throws Exception{
try {
Debug.PushSubsStack("Button2_Click (appmain) ","appmain",6,appmain.mostCurrent.activityBA,appmain.mostCurrent,150);
if (RapidSub.canDelegate("button2_click")) { return shub.dpm.appmain.remoteMe.runUserSub(false, "appmain","button2_click");}
BA.debugLineNum = 150;BA.debugLine="Private Sub Button2_Click";
Debug.ShouldStop(2097152);
BA.debugLineNum = 151;BA.debugLine="Try";
Debug.ShouldStop(4194304);
try { BA.debugLineNum = 152;BA.debugLine="bs1.stopScanning";
Debug.ShouldStop(8388608);
appmain.mostCurrent._bs1.runVoidMethod ("stopScanning");
Debug.CheckDeviceExceptions();
}
catch (Exception e4) {
BA.rdebugUtils.runVoidMethod("setLastException",appmain.processBA, e4.toString()); };
BA.debugLineNum = 155;BA.debugLine="End Sub";
Debug.ShouldStop(67108864);
return RemoteObject.createImmutable("");
}
catch (Exception e) {
throw Debug.ErrorCaught(e);
}
finally {
Debug.PopSubsStack();
}}
public static RemoteObject _datediff(RemoteObject _units,RemoteObject _date1,RemoteObject _date2) throws Exception{
try {
Debug.PushSubsStack("DateDiff (appmain) ","appmain",6,appmain.mostCurrent.activityBA,appmain.mostCurrent,103);
if (RapidSub.canDelegate("datediff")) { return shub.dpm.appmain.remoteMe.runUserSub(false, "appmain","datediff", _units, _date1, _date2);}
RemoteObject _x = RemoteObject.createImmutable(0L);
RemoteObject _y = RemoteObject.createImmutable(0L);
RemoteObject _z = RemoteObject.createImmutable(0L);
Debug.locals.put("units", _units);
Debug.locals.put("date1", _date1);
Debug.locals.put("date2", _date2);
BA.debugLineNum = 103;BA.debugLine="Sub DateDiff (units, date1, date2)";
Debug.ShouldStop(64);
BA.debugLineNum = 104;BA.debugLine="Try";
Debug.ShouldStop(128);
try { BA.debugLineNum = 105;BA.debugLine="Dim x As Long";
Debug.ShouldStop(256);
_x = RemoteObject.createImmutable(0L);Debug.locals.put("x", _x);
BA.debugLineNum = 106;BA.debugLine="Dim y As Long";
Debug.ShouldStop(512);
_y = RemoteObject.createImmutable(0L);Debug.locals.put("y", _y);
BA.debugLineNum = 107;BA.debugLine="Dim z As Long";
Debug.ShouldStop(1024);
_z = RemoteObject.createImmutable(0L);Debug.locals.put("z", _z);
BA.debugLineNum = 108;BA.debugLine="x=DateTime.DateParse(date1)";
Debug.ShouldStop(2048);
_x = appmain.mostCurrent.__c.getField(false,"DateTime").runMethod(true,"DateParse",(Object)(_date1));Debug.locals.put("x", _x);
BA.debugLineNum = 109;BA.debugLine="y=DateTime.DateParse(date2)";
Debug.ShouldStop(4096);
_y = appmain.mostCurrent.__c.getField(false,"DateTime").runMethod(true,"DateParse",(Object)(_date2));Debug.locals.put("y", _y);
BA.debugLineNum = 110;BA.debugLine="Select units";
Debug.ShouldStop(8192);
switch (BA.switchObjectToInt(_units,BA.ObjectToString("ss"))) {
case 0: {
BA.debugLineNum = 112;BA.debugLine="z=60";
Debug.ShouldStop(32768);
_z = BA.numberCast(long.class, 60);Debug.locals.put("z", _z);
break; }
}
;
BA.debugLineNum = 115;BA.debugLine="Return (y-x) / z";
Debug.ShouldStop(262144);
Debug.CheckDeviceExceptions();if (true) return BA.NumberToString(RemoteObject.solve(new RemoteObject[] {(RemoteObject.solve(new RemoteObject[] {_y,_x}, "-",1, 2)),_z}, "/",0, 0));
Debug.CheckDeviceExceptions();
}
catch (Exception e13) {
BA.rdebugUtils.runVoidMethod("setLastException",appmain.processBA, e13.toString()); BA.debugLineNum = 117;BA.debugLine="Return 10";
Debug.ShouldStop(1048576);
if (true) return BA.NumberToString(10);
};
BA.debugLineNum = 121;BA.debugLine="End Sub";
Debug.ShouldStop(16777216);
return RemoteObject.createImmutable("");
}
catch (Exception e) {
throw Debug.ErrorCaught(e);
}
finally {
Debug.PopSubsStack();
}}
public static RemoteObject _get_params() throws Exception{
try {
Debug.PushSubsStack("Get_Params (appmain) ","appmain",6,appmain.mostCurrent.activityBA,appmain.mostCurrent,83);
if (RapidSub.canDelegate("get_params")) { return shub.dpm.appmain.remoteMe.runUserSub(false, "appmain","get_params");}
RemoteObject _tr = RemoteObject.declareNull("anywheresoftware.b4a.objects.streams.File.TextReaderWrapper");
RemoteObject _inp = RemoteObject.declareNull("anywheresoftware.b4a.objects.streams.File.InputStreamWrapper");
BA.debugLineNum = 83;BA.debugLine="Sub Get_Params";
Debug.ShouldStop(262144);
BA.debugLineNum = 84;BA.debugLine="Dim TR As TextReader";
Debug.ShouldStop(524288);
_tr = RemoteObject.createNew ("anywheresoftware.b4a.objects.streams.File.TextReaderWrapper");Debug.locals.put("TR", _tr);
BA.debugLineNum = 85;BA.debugLine="Dim inp As InputStream";
Debug.ShouldStop(1048576);
_inp = RemoteObject.createNew ("anywheresoftware.b4a.objects.streams.File.InputStreamWrapper");Debug.locals.put("inp", _inp);
BA.debugLineNum = 86;BA.debugLine="inp=File.OpenInput(File.DirInternal , \"DPM.ini\")";
Debug.ShouldStop(2097152);
_inp = appmain.mostCurrent.__c.getField(false,"File").runMethod(false,"OpenInput",(Object)(appmain.mostCurrent.__c.getField(false,"File").runMethod(true,"getDirInternal")),(Object)(RemoteObject.createImmutable("DPM.ini")));Debug.locals.put("inp", _inp);
BA.debugLineNum = 87;BA.debugLine="TR.Initialize(inp)";
Debug.ShouldStop(4194304);
_tr.runVoidMethod ("Initialize",(Object)((_inp.getObject())));
BA.debugLineNum = 88;BA.debugLine="Try";
Debug.ShouldStop(8388608);
try { BA.debugLineNum = 89;BA.debugLine="sURL=TR.Readline";
Debug.ShouldStop(16777216);
appmain._surl = _tr.runMethod(true,"ReadLine");
Debug.CheckDeviceExceptions();
}
catch (Exception e8) {
BA.rdebugUtils.runVoidMethod("setLastException",appmain.processBA, e8.toString()); BA.debugLineNum = 91;BA.debugLine="sURL=\"\"";
Debug.ShouldStop(67108864);
appmain._surl = BA.ObjectToString("");
};
BA.debugLineNum = 93;BA.debugLine="Try";
Debug.ShouldStop(268435456);
try { BA.debugLineNum = 94;BA.debugLine="timeout = TR.ReadLine";
Debug.ShouldStop(536870912);
appmain._timeout = BA.numberCast(long.class, _tr.runMethod(true,"ReadLine"));
Debug.CheckDeviceExceptions();
}
catch (Exception e13) {
BA.rdebugUtils.runVoidMethod("setLastException",appmain.processBA, e13.toString()); BA.debugLineNum = 97;BA.debugLine="timeout=30000";
Debug.ShouldStop(1);
appmain._timeout = BA.numberCast(long.class, 30000);
};
BA.debugLineNum = 100;BA.debugLine="TR.Close";
Debug.ShouldStop(8);
_tr.runVoidMethod ("Close");
BA.debugLineNum = 101;BA.debugLine="End Sub";
Debug.ShouldStop(16);
return RemoteObject.createImmutable("");
}
catch (Exception e) {
throw Debug.ErrorCaught(e);
}
finally {
Debug.PopSubsStack();
}}
public static RemoteObject _get_pat(RemoteObject _id) throws Exception{
try {
Debug.PushSubsStack("get_Pat (appmain) ","appmain",6,appmain.mostCurrent.activityBA,appmain.mostCurrent,158);
if (RapidSub.canDelegate("get_pat")) { return shub.dpm.appmain.remoteMe.runUserSub(false, "appmain","get_pat", _id);}
RemoteObject _job = RemoteObject.declareNull("shub.dpm.httpjob");
RemoteObject _callurl = RemoteObject.createImmutable("");
Debug.locals.put("id", _id);
BA.debugLineNum = 158;BA.debugLine="Sub get_Pat(id As String)";
Debug.ShouldStop(536870912);
BA.debugLineNum = 159;BA.debugLine="Dim job As HttpJob";
Debug.ShouldStop(1073741824);
_job = RemoteObject.createNew ("shub.dpm.httpjob");Debug.locals.put("job", _job);
BA.debugLineNum = 160;BA.debugLine="JobName=\"GetPat\"";
Debug.ShouldStop(-2147483648);
appmain.mostCurrent._jobname = BA.ObjectToString("GetPat");
BA.debugLineNum = 161;BA.debugLine="job.Initialize(JobName, Me)";
Debug.ShouldStop(1);
_job.runClassMethod (shub.dpm.httpjob.class, "_initialize" /*RemoteObject*/ ,appmain.processBA,(Object)(appmain.mostCurrent._jobname),(Object)(appmain.getObject()));
BA.debugLineNum = 163;BA.debugLine="Dim callurl As String";
Debug.ShouldStop(4);
_callurl = RemoteObject.createImmutable("");Debug.locals.put("callurl", _callurl);
BA.debugLineNum = 164;BA.debugLine="callurl=sURL&\"/DPMService/api/Service_View_Pat/\"&";
Debug.ShouldStop(8);
_callurl = RemoteObject.concat(appmain._surl,RemoteObject.createImmutable("/DPMService/api/Service_View_Pat/"),_id);Debug.locals.put("callurl", _callurl);
BA.debugLineNum = 165;BA.debugLine="job.Download(callurl)";
Debug.ShouldStop(16);
_job.runClassMethod (shub.dpm.httpjob.class, "_download" /*RemoteObject*/ ,(Object)(_callurl));
BA.debugLineNum = 168;BA.debugLine="End Sub";
Debug.ShouldStop(128);
return RemoteObject.createImmutable("");
}
catch (Exception e) {
throw Debug.ErrorCaught(e);
}
finally {
Debug.PopSubsStack();
}}
public static RemoteObject _globals() throws Exception{
//BA.debugLineNum = 14;BA.debugLine="Sub Globals";
//BA.debugLineNum = 18;BA.debugLine="Private bs1 As BillScanner";
appmain.mostCurrent._bs1 = RemoteObject.createNew ("billwrapper.billWrapper");
//BA.debugLineNum = 19;BA.debugLine="Private Button1 As Button";
appmain.mostCurrent._button1 = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper");
//BA.debugLineNum = 21;BA.debugLine="Private Button2 As Button";
appmain.mostCurrent._button2 = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper");
//BA.debugLineNum = 22;BA.debugLine="Dim JobName As String";
appmain.mostCurrent._jobname = RemoteObject.createImmutable("");
//BA.debugLineNum = 24;BA.debugLine="Dim PatName As String";
appmain.mostCurrent._patname = RemoteObject.createImmutable("");
//BA.debugLineNum = 25;BA.debugLine="Private txtPatNr As EditText";
appmain.mostCurrent._txtpatnr = RemoteObject.createNew ("anywheresoftware.b4a.objects.EditTextWrapper");
//BA.debugLineNum = 26;BA.debugLine="Private pnlEnterPatID As Panel";
appmain.mostCurrent._pnlenterpatid = RemoteObject.createNew ("anywheresoftware.b4a.objects.PanelWrapper");
//BA.debugLineNum = 27;BA.debugLine="Private lblPatient As Label";
appmain.mostCurrent._lblpatient = RemoteObject.createNew ("anywheresoftware.b4a.objects.LabelWrapper");
//BA.debugLineNum = 28;BA.debugLine="Private timeout As Long";
appmain._timeout = RemoteObject.createImmutable(0L);
//BA.debugLineNum = 30;BA.debugLine="Private dtnow As Long";
appmain._dtnow = RemoteObject.createImmutable(0L);
//BA.debugLineNum = 32;BA.debugLine="Private btnSearchPat As Button";
appmain.mostCurrent._btnsearchpat = RemoteObject.createNew ("anywheresoftware.b4a.objects.ButtonWrapper");
//BA.debugLineNum = 33;BA.debugLine="Dim PatTimer As Timer";
appmain.mostCurrent._pattimer = RemoteObject.createNew ("anywheresoftware.b4a.objects.Timer");
//BA.debugLineNum = 34;BA.debugLine="Dim StartTimer As Timer";
appmain.mostCurrent._starttimer = RemoteObject.createNew ("anywheresoftware.b4a.objects.Timer");
//BA.debugLineNum = 35;BA.debugLine="End Sub";
return RemoteObject.createImmutable("");
}
public static RemoteObject _jobdone(RemoteObject _job) throws Exception{
try {
Debug.PushSubsStack("JobDone (appmain) ","appmain",6,appmain.mostCurrent.activityBA,appmain.mostCurrent,171);
if (RapidSub.canDelegate("jobdone")) { return shub.dpm.appmain.remoteMe.runUserSub(false, "appmain","jobdone", _job);}
RemoteObject _res = RemoteObject.createImmutable("");
RemoteObject _parser = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.JSONParser");
RemoteObject _list1 = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.List");
RemoteObject _map1 = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.Map");
Debug.locals.put("Job", _job);
BA.debugLineNum = 171;BA.debugLine="Sub JobDone(Job As HttpJob)";
Debug.ShouldStop(1024);
BA.debugLineNum = 172;BA.debugLine="ProgressDialogHide";
Debug.ShouldStop(2048);
appmain.mostCurrent.__c.runVoidMethod ("ProgressDialogHide");
BA.debugLineNum = 173;BA.debugLine="If Job.Success Then";
Debug.ShouldStop(4096);
if (_job.getField(true,"_success" /*RemoteObject*/ ).<Boolean>get().booleanValue()) {
BA.debugLineNum = 174;BA.debugLine="Dim res As String";
Debug.ShouldStop(8192);
_res = RemoteObject.createImmutable("");Debug.locals.put("res", _res);
BA.debugLineNum = 175;BA.debugLine="res = Job.GetString";
Debug.ShouldStop(16384);
_res = _job.runClassMethod (shub.dpm.httpjob.class, "_getstring" /*RemoteObject*/ );Debug.locals.put("res", _res);
BA.debugLineNum = 176;BA.debugLine="Dim parser As JSONParser";
Debug.ShouldStop(32768);
_parser = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.JSONParser");Debug.locals.put("parser", _parser);
BA.debugLineNum = 177;BA.debugLine="parser.Initialize(res)";
Debug.ShouldStop(65536);
_parser.runVoidMethod ("Initialize",(Object)(_res));
BA.debugLineNum = 179;BA.debugLine="Log(\"Response from server: \" & res)";
Debug.ShouldStop(262144);
appmain.mostCurrent.__c.runVoidMethod ("LogImpl","73670024",RemoteObject.concat(RemoteObject.createImmutable("Response from server: "),_res),0);
BA.debugLineNum = 181;BA.debugLine="Select Job.JobName";
Debug.ShouldStop(1048576);
switch (BA.switchObjectToInt(_job.getField(true,"_jobname" /*RemoteObject*/ ),BA.ObjectToString("GetPat"),BA.ObjectToString("PostCharche"))) {
case 0: {
BA.debugLineNum = 184;BA.debugLine="Dim list1 As List";
Debug.ShouldStop(8388608);
_list1 = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.List");Debug.locals.put("list1", _list1);
BA.debugLineNum = 185;BA.debugLine="list1 = parser.NextArray";
Debug.ShouldStop(16777216);
_list1 = _parser.runMethod(false,"NextArray");Debug.locals.put("list1", _list1);
BA.debugLineNum = 186;BA.debugLine="If list1.Size<1 Then";
Debug.ShouldStop(33554432);
if (RemoteObject.solveBoolean("<",_list1.runMethod(true,"getSize"),BA.numberCast(double.class, 1))) {
BA.debugLineNum = 187;BA.debugLine="ToastMessageShow(\"Patient nicht vorhanden.\",T";
Debug.ShouldStop(67108864);
appmain.mostCurrent.__c.runVoidMethod ("ToastMessageShow",(Object)(BA.ObjectToCharSequence("Patient nicht vorhanden.")),(Object)(appmain.mostCurrent.__c.getField(true,"True")));
BA.debugLineNum = 188;BA.debugLine="pnlEnterPatID.Visible=True";
Debug.ShouldStop(134217728);
appmain.mostCurrent._pnlenterpatid.runMethod(true,"setVisible",appmain.mostCurrent.__c.getField(true,"True"));
BA.debugLineNum = 189;BA.debugLine="Return";
Debug.ShouldStop(268435456);
if (true) return RemoteObject.createImmutable("");
};
BA.debugLineNum = 191;BA.debugLine="Dim map1 As Map";
Debug.ShouldStop(1073741824);
_map1 = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.Map");Debug.locals.put("map1", _map1);
BA.debugLineNum = 192;BA.debugLine="map1 = list1.Get(0)";
Debug.ShouldStop(-2147483648);
_map1 = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.collections.Map"), _list1.runMethod(false,"Get",(Object)(BA.numberCast(int.class, 0))));
BA.debugLineNum = 193;BA.debugLine="Log(map1)";
Debug.ShouldStop(1);
appmain.mostCurrent.__c.runVoidMethod ("LogImpl","73670038",BA.ObjectToString(_map1),0);
BA.debugLineNum = 195;BA.debugLine="PatID = map1.Get(\"id\")";
Debug.ShouldStop(4);
appmain._patid = BA.ObjectToString(_map1.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("id")))));
BA.debugLineNum = 196;BA.debugLine="PatName=map1.Get(\"pat\")";
Debug.ShouldStop(8);
appmain.mostCurrent._patname = BA.ObjectToString(_map1.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("pat")))));
BA.debugLineNum = 197;BA.debugLine="lblPatient.Text=PatName";
Debug.ShouldStop(16);
appmain.mostCurrent._lblpatient.runMethod(true,"setText",BA.ObjectToCharSequence(appmain.mostCurrent._patname));
break; }
case 1: {
BA.debugLineNum = 199;BA.debugLine="ToastMessageShow(\"Barcode erfolgreich gespeich";
Debug.ShouldStop(64);
appmain.mostCurrent.__c.runVoidMethod ("ToastMessageShow",(Object)(BA.ObjectToCharSequence("Barcode erfolgreich gespeichert")),(Object)(appmain.mostCurrent.__c.getField(true,"False")));
break; }
}
;
}else {
BA.debugLineNum = 202;BA.debugLine="ToastMessageShow(\"Funktionsaufruf fehlgeschlagen";
Debug.ShouldStop(512);
appmain.mostCurrent.__c.runVoidMethod ("ToastMessageShow",(Object)(BA.ObjectToCharSequence("Funktionsaufruf fehlgeschlagen.")),(Object)(appmain.mostCurrent.__c.getField(true,"True")));
};
BA.debugLineNum = 204;BA.debugLine="Job.Release";
Debug.ShouldStop(2048);
_job.runClassMethod (shub.dpm.httpjob.class, "_release" /*RemoteObject*/ );
BA.debugLineNum = 205;BA.debugLine="End Sub";
Debug.ShouldStop(4096);
return RemoteObject.createImmutable("");
}
catch (Exception e) {
throw Debug.ErrorCaught(e);
}
finally {
Debug.PopSubsStack();
}}
public static RemoteObject _lblpatient_longclick() throws Exception{
try {
Debug.PushSubsStack("lblPatient_LongClick (appmain) ","appmain",6,appmain.mostCurrent.activityBA,appmain.mostCurrent,224);
if (RapidSub.canDelegate("lblpatient_longclick")) { return shub.dpm.appmain.remoteMe.runUserSub(false, "appmain","lblpatient_longclick");}
BA.debugLineNum = 224;BA.debugLine="Private Sub lblPatient_LongClick";
Debug.ShouldStop(-2147483648);
BA.debugLineNum = 225;BA.debugLine="StartActivity(\"Param\")";
Debug.ShouldStop(1);
appmain.mostCurrent.__c.runVoidMethod ("StartActivity",appmain.processBA,(Object)((RemoteObject.createImmutable("Param"))));
BA.debugLineNum = 226;BA.debugLine="End Sub";
Debug.ShouldStop(2);
return RemoteObject.createImmutable("");
}
catch (Exception e) {
throw Debug.ErrorCaught(e);
}
finally {
Debug.PopSubsStack();
}}
public static RemoteObject _process_globals() throws Exception{
//BA.debugLineNum = 6;BA.debugLine="Sub Process_Globals";
//BA.debugLineNum = 9;BA.debugLine="Public PatID As String";
appmain._patid = RemoteObject.createImmutable("");
//BA.debugLineNum = 10;BA.debugLine="Public sURL As String=\"\"";
appmain._surl = BA.ObjectToString("");
//BA.debugLineNum = 12;BA.debugLine="End Sub";
return RemoteObject.createImmutable("");
}
public static RemoteObject _timer_tick() throws Exception{
try {
Debug.PushSubsStack("Timer_Tick (appmain) ","appmain",6,appmain.mostCurrent.activityBA,appmain.mostCurrent,78);
if (RapidSub.canDelegate("timer_tick")) { return shub.dpm.appmain.remoteMe.runUserSub(false, "appmain","timer_tick");}
BA.debugLineNum = 78;BA.debugLine="Sub Timer_Tick";
Debug.ShouldStop(8192);
BA.debugLineNum = 79;BA.debugLine="PatID=0";
Debug.ShouldStop(16384);
appmain._patid = BA.NumberToString(0);
BA.debugLineNum = 80;BA.debugLine="lblPatient.Text=\"Bitte Patient auswählen\"";
Debug.ShouldStop(32768);
appmain.mostCurrent._lblpatient.runMethod(true,"setText",BA.ObjectToCharSequence("Bitte Patient auswählen"));
BA.debugLineNum = 81;BA.debugLine="End Sub";
Debug.ShouldStop(65536);
return RemoteObject.createImmutable("");
}
catch (Exception e) {
throw Debug.ErrorCaught(e);
}
finally {
Debug.PopSubsStack();
}}
}

View File

@@ -0,0 +1,43 @@
package shub.dpm;
import anywheresoftware.b4a.pc.PCBA;
import anywheresoftware.b4a.pc.RemoteObject;
public class b4xbreadcrumb {
public static RemoteObject myClass;
public b4xbreadcrumb() {
}
public static PCBA staticBA = new PCBA(null, b4xbreadcrumb.class);
public static RemoteObject __c = RemoteObject.declareNull("anywheresoftware.b4a.keywords.Common");
public static RemoteObject _meventname = RemoteObject.createImmutable("");
public static RemoteObject _mcallback = RemoteObject.declareNull("Object");
public static RemoteObject _mbase = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper");
public static RemoteObject _xui = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper.XUI");
public static RemoteObject _cvs = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XCanvas");
public static RemoteObject _mitems = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.List");
public static RemoteObject _rightpositions = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.List");
public static RemoteObject _textcolor = RemoteObject.createImmutable(0);
public static RemoteObject _fnt = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper.B4XFont");
public static RemoteObject _offset = RemoteObject.createImmutable(0);
public static RemoteObject _bc = RemoteObject.declareNull("b4a.example.bitmapcreator");
public static RemoteObject _crumbcolor = RemoteObject.createImmutable(0);
public static RemoteObject _touchpanel = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper");
public static RemoteObject _presseditem = RemoteObject.createImmutable(0);
public static RemoteObject _tag = RemoteObject.declareNull("Object");
public static RemoteObject _mhaptic = RemoteObject.createImmutable(false);
public static RemoteObject _dateutils = RemoteObject.declareNull("b4a.example.dateutils");
public static shub.dpm.main _main = null;
public static shub.dpm.listdata _listdata = null;
public static shub.dpm.param _param = null;
public static shub.dpm.starter _starter = null;
public static shub.dpm.tempdata _tempdata = null;
public static shub.dpm.about _about = null;
public static shub.dpm.appmain _appmain = null;
public static shub.dpm.httputils2service _httputils2service = null;
public static shub.dpm.xuiviewsutils _xuiviewsutils = null;
public static Object[] GetGlobals(RemoteObject _ref) throws Exception {
return new Object[] {"bc",_ref.getField(false, "_bc"),"CrumbColor",_ref.getField(false, "_crumbcolor"),"cvs",_ref.getField(false, "_cvs"),"DateUtils",_ref.getField(false, "_dateutils"),"fnt",_ref.getField(false, "_fnt"),"mBase",_ref.getField(false, "_mbase"),"mCallBack",_ref.getField(false, "_mcallback"),"mEventName",_ref.getField(false, "_meventname"),"mHaptic",_ref.getField(false, "_mhaptic"),"mItems",_ref.getField(false, "_mitems"),"offset",_ref.getField(false, "_offset"),"PressedItem",_ref.getField(false, "_presseditem"),"RightPositions",_ref.getField(false, "_rightpositions"),"Tag",_ref.getField(false, "_tag"),"TextColor",_ref.getField(false, "_textcolor"),"TouchPanel",_ref.getField(false, "_touchpanel"),"xui",_ref.getField(false, "_xui")};
}
}

View File

@@ -0,0 +1,562 @@
package shub.dpm;
import anywheresoftware.b4a.BA;
import anywheresoftware.b4a.pc.*;
public class b4xbreadcrumb_subs_0 {
public static RemoteObject _base_resize(RemoteObject __ref,RemoteObject _width,RemoteObject _height) throws Exception{
try {
Debug.PushSubsStack("Base_Resize (b4xbreadcrumb) ","b4xbreadcrumb",11,__ref.getField(false, "ba"),__ref,51);
if (RapidSub.canDelegate("base_resize")) { return __ref.runUserSub(false, "b4xbreadcrumb","base_resize", __ref, _width, _height);}
Debug.locals.put("Width", _width);
Debug.locals.put("Height", _height);
BA.debugLineNum = 51;BA.debugLine="Private Sub Base_Resize (Width As Double, Height A";
Debug.JustUpdateDeviceLine();
BA.debugLineNum = 52;BA.debugLine="cvs.Resize(Width, Height)";
Debug.JustUpdateDeviceLine();
__ref.getField(false,"_cvs" /*RemoteObject*/ ).runVoidMethod ("Resize",(Object)(BA.numberCast(float.class, _width)),(Object)(BA.numberCast(float.class, _height)));
BA.debugLineNum = 53;BA.debugLine="TouchPanel.SetLayoutAnimated(0, 0, 0, Width, Heig";
Debug.JustUpdateDeviceLine();
__ref.getField(false,"_touchpanel" /*RemoteObject*/ ).runVoidMethod ("SetLayoutAnimated",(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, _width)),(Object)(BA.numberCast(int.class, _height)));
BA.debugLineNum = 54;BA.debugLine="Draw";
Debug.JustUpdateDeviceLine();
__ref.runClassMethod (shub.dpm.b4xbreadcrumb.class, "_draw" /*RemoteObject*/ );
BA.debugLineNum = 55;BA.debugLine="End Sub";
Debug.JustUpdateDeviceLine();
return RemoteObject.createImmutable("");
}
catch (Exception e) {
throw Debug.ErrorCaught(e);
}
finally {
Debug.PopSubsStack();
}}
public static RemoteObject _class_globals(RemoteObject __ref) throws Exception{
//BA.debugLineNum = 5;BA.debugLine="Sub Class_Globals";
//BA.debugLineNum = 6;BA.debugLine="Private mEventName As String 'ignore";
b4xbreadcrumb._meventname = RemoteObject.createImmutable("");__ref.setField("_meventname",b4xbreadcrumb._meventname);
//BA.debugLineNum = 7;BA.debugLine="Private mCallBack As Object 'ignore";
b4xbreadcrumb._mcallback = RemoteObject.createNew ("Object");__ref.setField("_mcallback",b4xbreadcrumb._mcallback);
//BA.debugLineNum = 8;BA.debugLine="Private mBase As B4XView 'ignore";
b4xbreadcrumb._mbase = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_mbase",b4xbreadcrumb._mbase);
//BA.debugLineNum = 9;BA.debugLine="Private xui As XUI 'ignore";
b4xbreadcrumb._xui = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper.XUI");__ref.setField("_xui",b4xbreadcrumb._xui);
//BA.debugLineNum = 10;BA.debugLine="Private cvs As B4XCanvas";
b4xbreadcrumb._cvs = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XCanvas");__ref.setField("_cvs",b4xbreadcrumb._cvs);
//BA.debugLineNum = 11;BA.debugLine="Private mItems As List";
b4xbreadcrumb._mitems = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.List");__ref.setField("_mitems",b4xbreadcrumb._mitems);
//BA.debugLineNum = 12;BA.debugLine="Private RightPositions As List";
b4xbreadcrumb._rightpositions = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.List");__ref.setField("_rightpositions",b4xbreadcrumb._rightpositions);
//BA.debugLineNum = 13;BA.debugLine="Public TextColor As Int";
b4xbreadcrumb._textcolor = RemoteObject.createImmutable(0);__ref.setField("_textcolor",b4xbreadcrumb._textcolor);
//BA.debugLineNum = 14;BA.debugLine="Public fnt As B4XFont";
b4xbreadcrumb._fnt = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper.B4XFont");__ref.setField("_fnt",b4xbreadcrumb._fnt);
//BA.debugLineNum = 15;BA.debugLine="Private offset As Int = 10dip";
b4xbreadcrumb._offset = b4xbreadcrumb.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 10)));__ref.setField("_offset",b4xbreadcrumb._offset);
//BA.debugLineNum = 16;BA.debugLine="Private bc As BitmapCreator";
b4xbreadcrumb._bc = RemoteObject.createNew ("b4a.example.bitmapcreator");__ref.setField("_bc",b4xbreadcrumb._bc);
//BA.debugLineNum = 17;BA.debugLine="Public CrumbColor As Int";
b4xbreadcrumb._crumbcolor = RemoteObject.createImmutable(0);__ref.setField("_crumbcolor",b4xbreadcrumb._crumbcolor);
//BA.debugLineNum = 18;BA.debugLine="Private TouchPanel As B4XView";
b4xbreadcrumb._touchpanel = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");__ref.setField("_touchpanel",b4xbreadcrumb._touchpanel);
//BA.debugLineNum = 19;BA.debugLine="Private PressedItem As Int = -1";
b4xbreadcrumb._presseditem = BA.numberCast(int.class, -(double) (0 + 1));__ref.setField("_presseditem",b4xbreadcrumb._presseditem);
//BA.debugLineNum = 20;BA.debugLine="Public Tag As Object";
b4xbreadcrumb._tag = RemoteObject.createNew ("Object");__ref.setField("_tag",b4xbreadcrumb._tag);
//BA.debugLineNum = 21;BA.debugLine="Public mHaptic As Boolean";
b4xbreadcrumb._mhaptic = RemoteObject.createImmutable(false);__ref.setField("_mhaptic",b4xbreadcrumb._mhaptic);
//BA.debugLineNum = 22;BA.debugLine="End Sub";
return RemoteObject.createImmutable("");
}
public static RemoteObject _designercreateview(RemoteObject __ref,RemoteObject _base,RemoteObject _lbl,RemoteObject _props) throws Exception{
try {
Debug.PushSubsStack("DesignerCreateView (b4xbreadcrumb) ","b4xbreadcrumb",11,__ref.getField(false, "ba"),__ref,33);
if (RapidSub.canDelegate("designercreateview")) { return __ref.runUserSub(false, "b4xbreadcrumb","designercreateview", __ref, _base, _lbl, _props);}
RemoteObject _xlbl = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XViewWrapper");
RemoteObject _items = RemoteObject.createImmutable("");
RemoteObject _s = RemoteObject.createImmutable("");
Debug.locals.put("Base", _base);
Debug.locals.put("Lbl", _lbl);
Debug.locals.put("Props", _props);
BA.debugLineNum = 33;BA.debugLine="Public Sub DesignerCreateView (Base As Object, Lbl";
Debug.JustUpdateDeviceLine();
BA.debugLineNum = 34;BA.debugLine="mBase = Base";
Debug.JustUpdateDeviceLine();
__ref.getField(false,"_mbase" /*RemoteObject*/ ).setObject (_base);
BA.debugLineNum = 35;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me";
Debug.JustUpdateDeviceLine();
__ref.setField ("_tag" /*RemoteObject*/ ,__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(false,"getTag"));
BA.debugLineNum = 35;BA.debugLine="Tag = mBase.Tag : mBase.Tag = Me";
Debug.JustUpdateDeviceLine();
__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(false,"setTag",__ref);
BA.debugLineNum = 36;BA.debugLine="cvs.Initialize(mBase)";
Debug.JustUpdateDeviceLine();
__ref.getField(false,"_cvs" /*RemoteObject*/ ).runVoidMethod ("Initialize",(Object)(__ref.getField(false,"_mbase" /*RemoteObject*/ )));
BA.debugLineNum = 37;BA.debugLine="Dim xlbl As B4XView = Lbl";
Debug.JustUpdateDeviceLine();
_xlbl = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XViewWrapper");
_xlbl = RemoteObject.declareNull("anywheresoftware.b4a.AbsObjectWrapper").runMethod(false, "ConvertToWrapper", RemoteObject.createNew("anywheresoftware.b4a.objects.B4XViewWrapper"), _lbl.getObject());Debug.locals.put("xlbl", _xlbl);
BA.debugLineNum = 38;BA.debugLine="fnt = xlbl.Font";
Debug.JustUpdateDeviceLine();
__ref.setField ("_fnt" /*RemoteObject*/ ,_xlbl.runMethod(false,"getFont"));
BA.debugLineNum = 39;BA.debugLine="TextColor = xlbl.TextColor";
Debug.JustUpdateDeviceLine();
__ref.setField ("_textcolor" /*RemoteObject*/ ,_xlbl.runMethod(true,"getTextColor"));
BA.debugLineNum = 40;BA.debugLine="CrumbColor = xui.PaintOrColorToColor(Props.Get(\"C";
Debug.JustUpdateDeviceLine();
__ref.setField ("_crumbcolor" /*RemoteObject*/ ,__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(true,"PaintOrColorToColor",(Object)(_props.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("CrumbColor")))))));
BA.debugLineNum = 41;BA.debugLine="mHaptic = Props.GetDefault(\"HapticFeedback\", Fals";
Debug.JustUpdateDeviceLine();
__ref.setField ("_mhaptic" /*RemoteObject*/ ,BA.ObjectToBoolean(_props.runMethod(false,"GetDefault",(Object)(RemoteObject.createImmutable(("HapticFeedback"))),(Object)((b4xbreadcrumb.__c.getField(true,"False"))))));
BA.debugLineNum = 42;BA.debugLine="TouchPanel = xui.CreatePanel(\"Touch\")";
Debug.JustUpdateDeviceLine();
__ref.setField ("_touchpanel" /*RemoteObject*/ ,__ref.getField(false,"_xui" /*RemoteObject*/ ).runMethod(false,"CreatePanel",__ref.getField(false, "ba"),(Object)(RemoteObject.createImmutable("Touch"))));
BA.debugLineNum = 43;BA.debugLine="mBase.AddView(TouchPanel, 0, 0, mBase.Width, mBas";
Debug.JustUpdateDeviceLine();
__ref.getField(false,"_mbase" /*RemoteObject*/ ).runVoidMethod ("AddView",(Object)((__ref.getField(false,"_touchpanel" /*RemoteObject*/ ).getObject())),(Object)(BA.numberCast(int.class, 0)),(Object)(BA.numberCast(int.class, 0)),(Object)(__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getWidth")),(Object)(__ref.getField(false,"_mbase" /*RemoteObject*/ ).runMethod(true,"getHeight")));
BA.debugLineNum = 44;BA.debugLine="Dim items As String = Props.Get(\"Items\")";
Debug.JustUpdateDeviceLine();
_items = BA.ObjectToString(_props.runMethod(false,"Get",(Object)((RemoteObject.createImmutable("Items")))));Debug.locals.put("items", _items);Debug.locals.put("items", _items);
BA.debugLineNum = 45;BA.debugLine="For Each s As String In Regex.Split(\"\\|\", items)";
Debug.JustUpdateDeviceLine();
{
final RemoteObject group13 = b4xbreadcrumb.__c.getField(false,"Regex").runMethod(false,"Split",(Object)(BA.ObjectToString("\\|")),(Object)(_items));
final int groupLen13 = group13.getField(true,"length").<Integer>get()
;int index13 = 0;
;
for (; index13 < groupLen13;index13++){
_s = group13.getArrayElement(true,RemoteObject.createImmutable(index13));Debug.locals.put("s", _s);
Debug.locals.put("s", _s);
BA.debugLineNum = 46;BA.debugLine="mItems.Add(s)";
Debug.JustUpdateDeviceLine();
__ref.getField(false,"_mitems" /*RemoteObject*/ ).runVoidMethod ("Add",(Object)((_s)));
}
}Debug.locals.put("s", _s);
;
BA.debugLineNum = 48;BA.debugLine="Draw";
Debug.JustUpdateDeviceLine();
__ref.runClassMethod (shub.dpm.b4xbreadcrumb.class, "_draw" /*RemoteObject*/ );
BA.debugLineNum = 49;BA.debugLine="End Sub";
Debug.JustUpdateDeviceLine();
return RemoteObject.createImmutable("");
}
catch (Exception e) {
throw Debug.ErrorCaught(e);
}
finally {
Debug.PopSubsStack();
}}
public static RemoteObject _draw(RemoteObject __ref) throws Exception{
try {
Debug.PushSubsStack("Draw (b4xbreadcrumb) ","b4xbreadcrumb",11,__ref.getField(false, "ba"),__ref,57);
if (RapidSub.canDelegate("draw")) { return __ref.runUserSub(false, "b4xbreadcrumb","draw", __ref);}
RemoteObject _bcolor = RemoteObject.declareNull("b4a.example.bitmapcreator._argbcolor");
RemoteObject _strokecolor = RemoteObject.createImmutable(0);
RemoteObject _clrs = null;
RemoteObject _left = RemoteObject.createImmutable(0);
int _i = 0;
RemoteObject _sc = RemoteObject.createImmutable(0);
RemoteObject _width = RemoteObject.createImmutable(0);
BA.debugLineNum = 57;BA.debugLine="Private Sub Draw";
Debug.JustUpdateDeviceLine();
BA.debugLineNum = 58;BA.debugLine="cvs.ClearRect(cvs.TargetRect)";
Debug.JustUpdateDeviceLine();
__ref.getField(false,"_cvs" /*RemoteObject*/ ).runVoidMethod ("ClearRect",(Object)(__ref.getField(false,"_cvs" /*RemoteObject*/ ).runMethod(false,"getTargetRect")));
BA.debugLineNum = 59;BA.debugLine="Dim bcolor As ARGBColor";
Debug.JustUpdateDeviceLine();
_bcolor = RemoteObject.createNew ("b4a.example.bitmapcreator._argbcolor");Debug.locals.put("bcolor", _bcolor);
BA.debugLineNum = 60;BA.debugLine="bc.ColorToARGB(CrumbColor, bcolor)";
Debug.JustUpdateDeviceLine();
__ref.getField(false,"_bc" /*RemoteObject*/ ).runVoidMethod ("_colortoargb",(Object)(__ref.getField(true,"_crumbcolor" /*RemoteObject*/ )),(Object)(_bcolor));
BA.debugLineNum = 61;BA.debugLine="bcolor.r = Min(255, bcolor.r * 2)";
Debug.JustUpdateDeviceLine();
_bcolor.setField ("r",BA.numberCast(int.class, b4xbreadcrumb.__c.runMethod(true,"Min",(Object)(BA.numberCast(double.class, 255)),(Object)(BA.numberCast(double.class, RemoteObject.solve(new RemoteObject[] {_bcolor.getField(true,"r"),RemoteObject.createImmutable(2)}, "*",0, 1))))));
BA.debugLineNum = 62;BA.debugLine="bcolor.g = Min(255, bcolor.g * 2)";
Debug.JustUpdateDeviceLine();
_bcolor.setField ("g",BA.numberCast(int.class, b4xbreadcrumb.__c.runMethod(true,"Min",(Object)(BA.numberCast(double.class, 255)),(Object)(BA.numberCast(double.class, RemoteObject.solve(new RemoteObject[] {_bcolor.getField(true,"g"),RemoteObject.createImmutable(2)}, "*",0, 1))))));
BA.debugLineNum = 63;BA.debugLine="bcolor.b = Min(255, bcolor.b * 2)";
Debug.JustUpdateDeviceLine();
_bcolor.setField ("b",BA.numberCast(int.class, b4xbreadcrumb.__c.runMethod(true,"Min",(Object)(BA.numberCast(double.class, 255)),(Object)(BA.numberCast(double.class, RemoteObject.solve(new RemoteObject[] {_bcolor.getField(true,"b"),RemoteObject.createImmutable(2)}, "*",0, 1))))));
BA.debugLineNum = 64;BA.debugLine="Dim strokeColor As Int = bc.ARGBToColor(bcolor)";
Debug.JustUpdateDeviceLine();
_strokecolor = __ref.getField(false,"_bc" /*RemoteObject*/ ).runMethod(true,"_argbtocolor",(Object)(_bcolor));Debug.locals.put("strokeColor", _strokecolor);Debug.locals.put("strokeColor", _strokecolor);
BA.debugLineNum = 66;BA.debugLine="bc.ColorToARGB(CrumbColor, bcolor)";
Debug.JustUpdateDeviceLine();
__ref.getField(false,"_bc" /*RemoteObject*/ ).runVoidMethod ("_colortoargb",(Object)(__ref.getField(true,"_crumbcolor" /*RemoteObject*/ )),(Object)(_bcolor));
BA.debugLineNum = 67;BA.debugLine="bcolor.r = bcolor.r * 0.8";
Debug.JustUpdateDeviceLine();
_bcolor.setField ("r",BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {_bcolor.getField(true,"r"),RemoteObject.createImmutable(0.8)}, "*",0, 0)));
BA.debugLineNum = 68;BA.debugLine="bcolor.g = bcolor.g * 0.8";
Debug.JustUpdateDeviceLine();
_bcolor.setField ("g",BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {_bcolor.getField(true,"g"),RemoteObject.createImmutable(0.8)}, "*",0, 0)));
BA.debugLineNum = 69;BA.debugLine="bcolor.b = bcolor.b * 0.8";
Debug.JustUpdateDeviceLine();
_bcolor.setField ("b",BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {_bcolor.getField(true,"b"),RemoteObject.createImmutable(0.8)}, "*",0, 0)));
BA.debugLineNum = 70;BA.debugLine="Dim Clrs() As Int = Array As Int(CrumbColor, bc.A";
Debug.JustUpdateDeviceLine();
_clrs = RemoteObject.createNewArray("int",new int[] {2},new Object[] {__ref.getField(true,"_crumbcolor" /*RemoteObject*/ ),__ref.getField(false,"_bc" /*RemoteObject*/ ).runMethod(true,"_argbtocolor",(Object)(_bcolor))});Debug.locals.put("Clrs", _clrs);Debug.locals.put("Clrs", _clrs);
BA.debugLineNum = 72;BA.debugLine="RightPositions.Clear";
Debug.JustUpdateDeviceLine();
__ref.getField(false,"_rightpositions" /*RemoteObject*/ ).runVoidMethod ("Clear");
BA.debugLineNum = 73;BA.debugLine="If mItems.Size = 0 Then Return";
Debug.JustUpdateDeviceLine();
if (RemoteObject.solveBoolean("=",__ref.getField(false,"_mitems" /*RemoteObject*/ ).runMethod(true,"getSize"),BA.numberCast(double.class, 0))) {
if (true) return RemoteObject.createImmutable("");};
BA.debugLineNum = 74;BA.debugLine="Dim Left As Int = 0";
Debug.JustUpdateDeviceLine();
_left = BA.numberCast(int.class, 0);Debug.locals.put("Left", _left);Debug.locals.put("Left", _left);
BA.debugLineNum = 75;BA.debugLine="For i = 0 To mItems.Size - 1";
Debug.JustUpdateDeviceLine();
{
final int step16 = 1;
final int limit16 = RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_mitems" /*RemoteObject*/ ).runMethod(true,"getSize"),RemoteObject.createImmutable(1)}, "-",1, 1).<Integer>get().intValue();
_i = 0 ;
for (;(step16 > 0 && _i <= limit16) || (step16 < 0 && _i >= limit16) ;_i = ((int)(0 + _i + step16)) ) {
Debug.locals.put("i", _i);
BA.debugLineNum = 76;BA.debugLine="Dim sc As Int";
Debug.JustUpdateDeviceLine();
_sc = RemoteObject.createImmutable(0);Debug.locals.put("sc", _sc);
BA.debugLineNum = 77;BA.debugLine="If PressedItem = i Then sc = strokeColor Else sc";
Debug.JustUpdateDeviceLine();
if (RemoteObject.solveBoolean("=",__ref.getField(true,"_presseditem" /*RemoteObject*/ ),BA.numberCast(double.class, _i))) {
_sc = _strokecolor;Debug.locals.put("sc", _sc);}
else {
_sc = BA.numberCast(int.class, 0);Debug.locals.put("sc", _sc);};
BA.debugLineNum = 78;BA.debugLine="Dim width As Int = DrawItem(Left, mItems.Get(i),";
Debug.JustUpdateDeviceLine();
_width = __ref.runClassMethod (shub.dpm.b4xbreadcrumb.class, "_drawitem" /*RemoteObject*/ ,(Object)(_left),(Object)(BA.ObjectToString(__ref.getField(false,"_mitems" /*RemoteObject*/ ).runMethod(false,"Get",(Object)(BA.numberCast(int.class, _i))))),(Object)(BA.ObjectToBoolean(RemoteObject.solveBoolean("=",RemoteObject.createImmutable(_i),BA.numberCast(double.class, 0)))),(Object)(BA.ObjectToBoolean(RemoteObject.solveBoolean("=",RemoteObject.createImmutable(_i),BA.numberCast(double.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_mitems" /*RemoteObject*/ ).runMethod(true,"getSize"),RemoteObject.createImmutable(1)}, "-",1, 1))))),(Object)(_clrs.getArrayElement(true,RemoteObject.solve(new RemoteObject[] {RemoteObject.createImmutable(_i),_clrs.getField(true,"length")}, "%",0, 1))),(Object)(_sc));Debug.locals.put("width", _width);Debug.locals.put("width", _width);
BA.debugLineNum = 79;BA.debugLine="Left = Left + width + offset + 2dip";
Debug.JustUpdateDeviceLine();
_left = RemoteObject.solve(new RemoteObject[] {_left,_width,__ref.getField(true,"_offset" /*RemoteObject*/ ),b4xbreadcrumb.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 2)))}, "+++",3, 1);Debug.locals.put("Left", _left);
BA.debugLineNum = 80;BA.debugLine="RightPositions.Add(Left)";
Debug.JustUpdateDeviceLine();
__ref.getField(false,"_rightpositions" /*RemoteObject*/ ).runVoidMethod ("Add",(Object)((_left)));
}
}Debug.locals.put("i", _i);
;
BA.debugLineNum = 82;BA.debugLine="cvs.Invalidate";
Debug.JustUpdateDeviceLine();
__ref.getField(false,"_cvs" /*RemoteObject*/ ).runVoidMethod ("Invalidate");
BA.debugLineNum = 83;BA.debugLine="End Sub";
Debug.JustUpdateDeviceLine();
return RemoteObject.createImmutable("");
}
catch (Exception e) {
throw Debug.ErrorCaught(e);
}
finally {
Debug.PopSubsStack();
}}
public static RemoteObject _drawitem(RemoteObject __ref,RemoteObject _left,RemoteObject _text,RemoteObject _first,RemoteObject _last,RemoteObject _clr,RemoteObject _strokecolor) throws Exception{
try {
Debug.PushSubsStack("DrawItem (b4xbreadcrumb) ","b4xbreadcrumb",11,__ref.getField(false, "ba"),__ref,85);
if (RapidSub.canDelegate("drawitem")) { return __ref.runUserSub(false, "b4xbreadcrumb","drawitem", __ref, _left, _text, _first, _last, _clr, _strokecolor);}
RemoteObject _r = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XCanvas.B4XRect");
RemoteObject _itemwidth = RemoteObject.createImmutable(0);
RemoteObject _itemheight = RemoteObject.createImmutable(0);
RemoteObject _baseline = RemoteObject.createImmutable(0);
RemoteObject _p = RemoteObject.declareNull("anywheresoftware.b4a.objects.B4XCanvas.B4XPath");
Debug.locals.put("Left", _left);
Debug.locals.put("Text", _text);
Debug.locals.put("First", _first);
Debug.locals.put("Last", _last);
Debug.locals.put("clr", _clr);
Debug.locals.put("strokeColor", _strokecolor);
BA.debugLineNum = 85;BA.debugLine="Private Sub DrawItem(Left As Int, Text As String,";
Debug.JustUpdateDeviceLine();
BA.debugLineNum = 86;BA.debugLine="Dim r As B4XRect = cvs.MeasureText(Text, fnt)";
Debug.JustUpdateDeviceLine();
_r = __ref.getField(false,"_cvs" /*RemoteObject*/ ).runMethod(false,"MeasureText",(Object)(_text),(Object)(__ref.getField(false,"_fnt" /*RemoteObject*/ )));Debug.locals.put("r", _r);Debug.locals.put("r", _r);
BA.debugLineNum = 87;BA.debugLine="Dim ItemWidth As Int = r.Width + 30dip";
Debug.JustUpdateDeviceLine();
_itemwidth = BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {_r.runMethod(true,"getWidth"),b4xbreadcrumb.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 30)))}, "+",1, 0));Debug.locals.put("ItemWidth", _itemwidth);Debug.locals.put("ItemWidth", _itemwidth);
BA.debugLineNum = 88;BA.debugLine="Dim ItemHeight As Int = cvs.TargetRect.Height";
Debug.JustUpdateDeviceLine();
_itemheight = BA.numberCast(int.class, __ref.getField(false,"_cvs" /*RemoteObject*/ ).runMethod(false,"getTargetRect").runMethod(true,"getHeight"));Debug.locals.put("ItemHeight", _itemheight);Debug.locals.put("ItemHeight", _itemheight);
BA.debugLineNum = 89;BA.debugLine="Dim BaseLine As Int = cvs.TargetRect.CenterY - r.";
Debug.JustUpdateDeviceLine();
_baseline = BA.numberCast(int.class, RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_cvs" /*RemoteObject*/ ).runMethod(false,"getTargetRect").runMethod(true,"getCenterY"),_r.runMethod(true,"getHeight"),RemoteObject.createImmutable(2),_r.runMethod(true,"getTop")}, "-/-",2, 0));Debug.locals.put("BaseLine", _baseline);Debug.locals.put("BaseLine", _baseline);
BA.debugLineNum = 90;BA.debugLine="Dim p As B4XPath";
Debug.JustUpdateDeviceLine();
_p = RemoteObject.createNew ("anywheresoftware.b4a.objects.B4XCanvas.B4XPath");Debug.locals.put("p", _p);
BA.debugLineNum = 91;BA.debugLine="p.Initialize(Left, 0)";
Debug.JustUpdateDeviceLine();
_p.runVoidMethod ("Initialize",(Object)(BA.numberCast(float.class, _left)),(Object)(BA.numberCast(float.class, 0)));
BA.debugLineNum = 92;BA.debugLine="p.LineTo(Left + ItemWidth, 0)";
Debug.JustUpdateDeviceLine();
_p.runVoidMethod ("LineTo",(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {_left,_itemwidth}, "+",1, 1))),(Object)(BA.numberCast(float.class, 0)));
BA.debugLineNum = 93;BA.debugLine="If Last = False Then";
Debug.JustUpdateDeviceLine();
if (RemoteObject.solveBoolean("=",_last,b4xbreadcrumb.__c.getField(true,"False"))) {
BA.debugLineNum = 94;BA.debugLine="p.LineTo(Left + ItemWidth + offset, ItemHeight /";
Debug.JustUpdateDeviceLine();
_p.runVoidMethod ("LineTo",(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {_left,_itemwidth,__ref.getField(true,"_offset" /*RemoteObject*/ )}, "++",2, 1))),(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {_itemheight,RemoteObject.createImmutable(2)}, "/",0, 0))));
};
BA.debugLineNum = 96;BA.debugLine="p.LineTo(Left + ItemWidth, ItemHeight)";
Debug.JustUpdateDeviceLine();
_p.runVoidMethod ("LineTo",(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {_left,_itemwidth}, "+",1, 1))),(Object)(BA.numberCast(float.class, _itemheight)));
BA.debugLineNum = 97;BA.debugLine="If First = False Then";
Debug.JustUpdateDeviceLine();
if (RemoteObject.solveBoolean("=",_first,b4xbreadcrumb.__c.getField(true,"False"))) {
BA.debugLineNum = 98;BA.debugLine="p.LineTo(Left - offset, ItemHeight)";
Debug.JustUpdateDeviceLine();
_p.runVoidMethod ("LineTo",(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {_left,__ref.getField(true,"_offset" /*RemoteObject*/ )}, "-",1, 1))),(Object)(BA.numberCast(float.class, _itemheight)));
BA.debugLineNum = 99;BA.debugLine="p.LineTo(Left, ItemHeight / 2)";
Debug.JustUpdateDeviceLine();
_p.runVoidMethod ("LineTo",(Object)(BA.numberCast(float.class, _left)),(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {_itemheight,RemoteObject.createImmutable(2)}, "/",0, 0))));
BA.debugLineNum = 100;BA.debugLine="p.LineTo(Left - offset, 0)";
Debug.JustUpdateDeviceLine();
_p.runVoidMethod ("LineTo",(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {_left,__ref.getField(true,"_offset" /*RemoteObject*/ )}, "-",1, 1))),(Object)(BA.numberCast(float.class, 0)));
}else {
BA.debugLineNum = 102;BA.debugLine="p.LineTo(Left, ItemHeight)";
Debug.JustUpdateDeviceLine();
_p.runVoidMethod ("LineTo",(Object)(BA.numberCast(float.class, _left)),(Object)(BA.numberCast(float.class, _itemheight)));
};
BA.debugLineNum = 104;BA.debugLine="p.LineTo(Left, 0)";
Debug.JustUpdateDeviceLine();
_p.runVoidMethod ("LineTo",(Object)(BA.numberCast(float.class, _left)),(Object)(BA.numberCast(float.class, 0)));
BA.debugLineNum = 105;BA.debugLine="cvs.DrawPath(p, clr, True, 0)";
Debug.JustUpdateDeviceLine();
__ref.getField(false,"_cvs" /*RemoteObject*/ ).runVoidMethod ("DrawPath",(Object)(_p),(Object)(_clr),(Object)(b4xbreadcrumb.__c.getField(true,"True")),(Object)(BA.numberCast(float.class, 0)));
BA.debugLineNum = 106;BA.debugLine="If strokeColor <> 0 Then";
Debug.JustUpdateDeviceLine();
if (RemoteObject.solveBoolean("!",_strokecolor,BA.numberCast(double.class, 0))) {
BA.debugLineNum = 107;BA.debugLine="cvs.DrawPath(p, strokeColor, False, 3dip)";
Debug.JustUpdateDeviceLine();
__ref.getField(false,"_cvs" /*RemoteObject*/ ).runVoidMethod ("DrawPath",(Object)(_p),(Object)(_strokecolor),(Object)(b4xbreadcrumb.__c.getField(true,"False")),(Object)(BA.numberCast(float.class, b4xbreadcrumb.__c.runMethod(true,"DipToCurrent",(Object)(BA.numberCast(int.class, 3))))));
};
BA.debugLineNum = 110;BA.debugLine="cvs.DrawText(Text, Left + ItemWidth / 2, BaseLine";
Debug.JustUpdateDeviceLine();
__ref.getField(false,"_cvs" /*RemoteObject*/ ).runVoidMethod ("DrawText",__ref.getField(false, "ba"),(Object)(_text),(Object)(BA.numberCast(float.class, RemoteObject.solve(new RemoteObject[] {_left,_itemwidth,RemoteObject.createImmutable(2)}, "+/",1, 0))),(Object)(BA.numberCast(float.class, _baseline)),(Object)(__ref.getField(false,"_fnt" /*RemoteObject*/ )),(Object)(__ref.getField(true,"_textcolor" /*RemoteObject*/ )),(Object)(BA.getEnumFromString(BA.getDeviceClass("android.graphics.Paint.Align"),RemoteObject.createImmutable("CENTER"))));
BA.debugLineNum = 111;BA.debugLine="Return ItemWidth";
Debug.JustUpdateDeviceLine();
if (true) return _itemwidth;
BA.debugLineNum = 112;BA.debugLine="End Sub";
Debug.JustUpdateDeviceLine();
return RemoteObject.createImmutable(0);
}
catch (Exception e) {
throw Debug.ErrorCaught(e);
}
finally {
Debug.PopSubsStack();
}}
public static RemoteObject _finditem(RemoteObject __ref,RemoteObject _x,RemoteObject _y) throws Exception{
try {
Debug.PushSubsStack("FindItem (b4xbreadcrumb) ","b4xbreadcrumb",11,__ref.getField(false, "ba"),__ref,136);
if (RapidSub.canDelegate("finditem")) { return __ref.runUserSub(false, "b4xbreadcrumb","finditem", __ref, _x, _y);}
RemoteObject _r = RemoteObject.createImmutable(0);
int _i = 0;
Debug.locals.put("x", _x);
Debug.locals.put("y", _y);
BA.debugLineNum = 136;BA.debugLine="Private Sub FindItem (x As Int, y As Int) As Int";
Debug.JustUpdateDeviceLine();
BA.debugLineNum = 137;BA.debugLine="If RightPositions.Size = 0 Then Return -1";
Debug.JustUpdateDeviceLine();
if (RemoteObject.solveBoolean("=",__ref.getField(false,"_rightpositions" /*RemoteObject*/ ).runMethod(true,"getSize"),BA.numberCast(double.class, 0))) {
if (true) return BA.numberCast(int.class, -(double) (0 + 1));};
BA.debugLineNum = 138;BA.debugLine="If y < 0 Or y > cvs.TargetRect.Height Then Return";
Debug.JustUpdateDeviceLine();
if (RemoteObject.solveBoolean("<",_y,BA.numberCast(double.class, 0)) || RemoteObject.solveBoolean(">",_y,BA.numberCast(double.class, __ref.getField(false,"_cvs" /*RemoteObject*/ ).runMethod(false,"getTargetRect").runMethod(true,"getHeight")))) {
if (true) return BA.numberCast(int.class, -(double) (0 + 1));};
BA.debugLineNum = 139;BA.debugLine="Dim r As Int = RightPositions.Get(RightPositions.";
Debug.JustUpdateDeviceLine();
_r = BA.numberCast(int.class, __ref.getField(false,"_rightpositions" /*RemoteObject*/ ).runMethod(false,"Get",(Object)(RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_rightpositions" /*RemoteObject*/ ).runMethod(true,"getSize"),RemoteObject.createImmutable(1)}, "-",1, 1))));Debug.locals.put("r", _r);Debug.locals.put("r", _r);
BA.debugLineNum = 140;BA.debugLine="If x > r Then Return -1";
Debug.JustUpdateDeviceLine();
if (RemoteObject.solveBoolean(">",_x,BA.numberCast(double.class, _r))) {
if (true) return BA.numberCast(int.class, -(double) (0 + 1));};
BA.debugLineNum = 141;BA.debugLine="For i = RightPositions.Size - 2 To 0 Step -1";
Debug.JustUpdateDeviceLine();
{
final int step5 = -1;
final int limit5 = 0;
_i = RemoteObject.solve(new RemoteObject[] {__ref.getField(false,"_rightpositions" /*RemoteObject*/ ).runMethod(true,"getSize"),RemoteObject.createImmutable(2)}, "-",1, 1).<Integer>get().intValue() ;
for (;(step5 > 0 && _i <= limit5) || (step5 < 0 && _i >= limit5) ;_i = ((int)(0 + _i + step5)) ) {
Debug.locals.put("i", _i);
BA.debugLineNum = 142;BA.debugLine="Dim r As Int = RightPositions.Get(i)";
Debug.JustUpdateDeviceLine();
_r = BA.numberCast(int.class, __ref.getField(false,"_rightpositions" /*RemoteObject*/ ).runMethod(false,"Get",(Object)(BA.numberCast(int.class, _i))));Debug.locals.put("r", _r);Debug.locals.put("r", _r);
BA.debugLineNum = 143;BA.debugLine="If x > r Then Return i + 1";
Debug.JustUpdateDeviceLine();
if (RemoteObject.solveBoolean(">",_x,BA.numberCast(double.class, _r))) {
if (true) return RemoteObject.solve(new RemoteObject[] {RemoteObject.createImmutable(_i),RemoteObject.createImmutable(1)}, "+",1, 1);};
}
}Debug.locals.put("i", _i);
;
BA.debugLineNum = 145;BA.debugLine="Return 0";
Debug.JustUpdateDeviceLine();
if (true) return BA.numberCast(int.class, 0);
BA.debugLineNum = 146;BA.debugLine="End Sub";
Debug.JustUpdateDeviceLine();
return RemoteObject.createImmutable(0);
}
catch (Exception e) {
throw Debug.ErrorCaught(e);
}
finally {
Debug.PopSubsStack();
}}
public static RemoteObject _getitems(RemoteObject __ref) throws Exception{
try {
Debug.PushSubsStack("getItems (b4xbreadcrumb) ","b4xbreadcrumb",11,__ref.getField(false, "ba"),__ref,153);
if (RapidSub.canDelegate("getitems")) { return __ref.runUserSub(false, "b4xbreadcrumb","getitems", __ref);}
BA.debugLineNum = 153;BA.debugLine="Public Sub getItems As List";
Debug.JustUpdateDeviceLine();
BA.debugLineNum = 154;BA.debugLine="Return mItems";
Debug.JustUpdateDeviceLine();
if (true) return __ref.getField(false,"_mitems" /*RemoteObject*/ );
BA.debugLineNum = 155;BA.debugLine="End Sub";
Debug.JustUpdateDeviceLine();
return RemoteObject.createImmutable(null);
}
catch (Exception e) {
throw Debug.ErrorCaught(e);
}
finally {
Debug.PopSubsStack();
}}
public static RemoteObject _initialize(RemoteObject __ref,RemoteObject _ba,RemoteObject _callback,RemoteObject _eventname) throws Exception{
try {
Debug.PushSubsStack("Initialize (b4xbreadcrumb) ","b4xbreadcrumb",11,__ref.getField(false, "ba"),__ref,24);
if (RapidSub.canDelegate("initialize")) { return __ref.runUserSub(false, "b4xbreadcrumb","initialize", __ref, _ba, _callback, _eventname);}
__ref.runVoidMethodAndSync("innerInitializeHelper", _ba);
Debug.locals.put("ba", _ba);
Debug.locals.put("Callback", _callback);
Debug.locals.put("EventName", _eventname);
BA.debugLineNum = 24;BA.debugLine="Public Sub Initialize (Callback As Object, EventNa";
Debug.JustUpdateDeviceLine();
BA.debugLineNum = 25;BA.debugLine="mEventName = EventName";
Debug.JustUpdateDeviceLine();
__ref.setField ("_meventname" /*RemoteObject*/ ,_eventname);
BA.debugLineNum = 26;BA.debugLine="mCallBack = Callback";
Debug.JustUpdateDeviceLine();
__ref.setField ("_mcallback" /*RemoteObject*/ ,_callback);
BA.debugLineNum = 27;BA.debugLine="mItems.Initialize";
Debug.JustUpdateDeviceLine();
__ref.getField(false,"_mitems" /*RemoteObject*/ ).runVoidMethod ("Initialize");
BA.debugLineNum = 28;BA.debugLine="RightPositions.Initialize";
Debug.JustUpdateDeviceLine();
__ref.getField(false,"_rightpositions" /*RemoteObject*/ ).runVoidMethod ("Initialize");
BA.debugLineNum = 29;BA.debugLine="bc.Initialize(1, 1)";
Debug.JustUpdateDeviceLine();
__ref.getField(false,"_bc" /*RemoteObject*/ ).runVoidMethod ("_initialize",__ref.getField(false, "ba"),(Object)(BA.numberCast(int.class, 1)),(Object)(BA.numberCast(int.class, 1)));
BA.debugLineNum = 30;BA.debugLine="End Sub";
Debug.JustUpdateDeviceLine();
return RemoteObject.createImmutable("");
}
catch (Exception e) {
throw Debug.ErrorCaught(e);
}
finally {
Debug.PopSubsStack();
}}
public static RemoteObject _setitems(RemoteObject __ref,RemoteObject _i) throws Exception{
try {
Debug.PushSubsStack("setItems (b4xbreadcrumb) ","b4xbreadcrumb",11,__ref.getField(false, "ba"),__ref,148);
if (RapidSub.canDelegate("setitems")) { return __ref.runUserSub(false, "b4xbreadcrumb","setitems", __ref, _i);}
Debug.locals.put("i", _i);
BA.debugLineNum = 148;BA.debugLine="Public Sub setItems (i As List)";
Debug.JustUpdateDeviceLine();
BA.debugLineNum = 149;BA.debugLine="mItems = i";
Debug.JustUpdateDeviceLine();
__ref.setField ("_mitems" /*RemoteObject*/ ,_i);
BA.debugLineNum = 150;BA.debugLine="Draw";
Debug.JustUpdateDeviceLine();
__ref.runClassMethod (shub.dpm.b4xbreadcrumb.class, "_draw" /*RemoteObject*/ );
BA.debugLineNum = 151;BA.debugLine="End Sub";
Debug.JustUpdateDeviceLine();
return RemoteObject.createImmutable("");
}
catch (Exception e) {
throw Debug.ErrorCaught(e);
}
finally {
Debug.PopSubsStack();
}}
public static RemoteObject _touch_touch(RemoteObject __ref,RemoteObject _action,RemoteObject _x,RemoteObject _y) throws Exception{
try {
Debug.PushSubsStack("Touch_Touch (b4xbreadcrumb) ","b4xbreadcrumb",11,__ref.getField(false, "ba"),__ref,114);
if (RapidSub.canDelegate("touch_touch")) { return __ref.runUserSub(false, "b4xbreadcrumb","touch_touch", __ref, _action, _x, _y);}
RemoteObject _prev = RemoteObject.createImmutable(0);
RemoteObject _index = RemoteObject.createImmutable(0);
RemoteObject _items = RemoteObject.declareNull("anywheresoftware.b4a.objects.collections.List");
int _i = 0;
Debug.locals.put("Action", _action);
Debug.locals.put("X", _x);
Debug.locals.put("Y", _y);
BA.debugLineNum = 114;BA.debugLine="Private Sub Touch_Touch (Action As Int, X As Float";
Debug.JustUpdateDeviceLine();
BA.debugLineNum = 115;BA.debugLine="Select Action";
Debug.JustUpdateDeviceLine();
switch (BA.switchObjectToInt(_action,__ref.getField(false,"_touchpanel" /*RemoteObject*/ ).getField(true,"TOUCH_ACTION_DOWN"),__ref.getField(false,"_touchpanel" /*RemoteObject*/ ).getField(true,"TOUCH_ACTION_MOVE"),__ref.getField(false,"_touchpanel" /*RemoteObject*/ ).getField(true,"TOUCH_ACTION_UP"))) {
case 0:
case 1: {
BA.debugLineNum = 117;BA.debugLine="Dim prev As Int = PressedItem";
Debug.JustUpdateDeviceLine();
_prev = __ref.getField(true,"_presseditem" /*RemoteObject*/ );Debug.locals.put("prev", _prev);Debug.locals.put("prev", _prev);
BA.debugLineNum = 118;BA.debugLine="PressedItem = FindItem(X, Y)";
Debug.JustUpdateDeviceLine();
__ref.setField ("_presseditem" /*RemoteObject*/ ,__ref.runClassMethod (shub.dpm.b4xbreadcrumb.class, "_finditem" /*RemoteObject*/ ,(Object)(BA.numberCast(int.class, _x)),(Object)(BA.numberCast(int.class, _y))));
BA.debugLineNum = 119;BA.debugLine="If prev <> PressedItem Then Draw";
Debug.JustUpdateDeviceLine();
if (RemoteObject.solveBoolean("!",_prev,BA.numberCast(double.class, __ref.getField(true,"_presseditem" /*RemoteObject*/ )))) {
__ref.runClassMethod (shub.dpm.b4xbreadcrumb.class, "_draw" /*RemoteObject*/ );};
break; }
case 2: {
BA.debugLineNum = 121;BA.debugLine="Dim index As Int = FindItem(X, Y)";
Debug.JustUpdateDeviceLine();
_index = __ref.runClassMethod (shub.dpm.b4xbreadcrumb.class, "_finditem" /*RemoteObject*/ ,(Object)(BA.numberCast(int.class, _x)),(Object)(BA.numberCast(int.class, _y)));Debug.locals.put("index", _index);Debug.locals.put("index", _index);
BA.debugLineNum = 122;BA.debugLine="If index = PressedItem And index > -1 Then";
Debug.JustUpdateDeviceLine();
if (RemoteObject.solveBoolean("=",_index,BA.numberCast(double.class, __ref.getField(true,"_presseditem" /*RemoteObject*/ ))) && RemoteObject.solveBoolean(">",_index,BA.numberCast(double.class, -(double) (0 + 1)))) {
BA.debugLineNum = 123;BA.debugLine="Dim Items As List";
Debug.JustUpdateDeviceLine();
_items = RemoteObject.createNew ("anywheresoftware.b4a.objects.collections.List");Debug.locals.put("Items", _items);
BA.debugLineNum = 124;BA.debugLine="Items.Initialize";
Debug.JustUpdateDeviceLine();
_items.runVoidMethod ("Initialize");
BA.debugLineNum = 125;BA.debugLine="For i = 0 To index";
Debug.JustUpdateDeviceLine();
{
final int step11 = 1;
final int limit11 = _index.<Integer>get().intValue();
_i = 0 ;
for (;(step11 > 0 && _i <= limit11) || (step11 < 0 && _i >= limit11) ;_i = ((int)(0 + _i + step11)) ) {
Debug.locals.put("i", _i);
BA.debugLineNum = 126;BA.debugLine="Items.Add(mItems.Get(i))";
Debug.JustUpdateDeviceLine();
_items.runVoidMethod ("Add",(Object)(__ref.getField(false,"_mitems" /*RemoteObject*/ ).runMethod(false,"Get",(Object)(BA.numberCast(int.class, _i)))));
}
}Debug.locals.put("i", _i);
;
BA.debugLineNum = 128;BA.debugLine="If mHaptic Then XUIViewsUtils.PerformHapticFee";
Debug.JustUpdateDeviceLine();
if (__ref.getField(true,"_mhaptic" /*RemoteObject*/ ).<Boolean>get().booleanValue()) {
b4xbreadcrumb._xuiviewsutils.runVoidMethod ("_performhapticfeedback" /*RemoteObject*/ ,__ref.getField(false, "ba"),(Object)(__ref.getField(false,"_mbase" /*RemoteObject*/ )));};
BA.debugLineNum = 129;BA.debugLine="CallSub2(mCallBack, mEventName & \"_CrumbClick\"";
Debug.JustUpdateDeviceLine();
b4xbreadcrumb.__c.runMethodAndSync(false,"CallSubNew2",__ref.getField(false, "ba"),(Object)(__ref.getField(false,"_mcallback" /*RemoteObject*/ )),(Object)(RemoteObject.concat(__ref.getField(true,"_meventname" /*RemoteObject*/ ),RemoteObject.createImmutable("_CrumbClick"))),(Object)((_items)));
};
BA.debugLineNum = 131;BA.debugLine="PressedItem = -1";
Debug.JustUpdateDeviceLine();
__ref.setField ("_presseditem" /*RemoteObject*/ ,BA.numberCast(int.class, -(double) (0 + 1)));
BA.debugLineNum = 132;BA.debugLine="Draw";
Debug.JustUpdateDeviceLine();
__ref.runClassMethod (shub.dpm.b4xbreadcrumb.class, "_draw" /*RemoteObject*/ );
break; }
}
;
BA.debugLineNum = 134;BA.debugLine="End Sub";
Debug.JustUpdateDeviceLine();
return RemoteObject.createImmutable("");
}
catch (Exception e) {
throw Debug.ErrorCaught(e);
}
finally {
Debug.PopSubsStack();
}}
}

Some files were not shown because too many files have changed in this diff Show More