iOS Question Who can help me to create b4i library?

Application_Start
Application_Background
Application_Foreground
Application_Active
Error occurred on line: 164 (Main)
-[UIImage imageWithWebp::]: unrecognized selector sent to instance 0x282618700
Stack Trace: (
  CoreFoundation       <redacted> + 252
  libobjc.A.dylib      objc_exception_throw + 56
  CoreFoundation       <redacted> + 0
  CoreFoundation       <redacted> + 1408
  CoreFoundation       _CF_forwarding_prep_0 + 92
  B4i Example          -[b4i_main _button2_click] + 788
  CoreFoundation       <redacted> + 144
  CoreFoundation       <redacted> + 292
  B4i Example          +[B4I runDynamicMethod:method:throwErrorIfMissing:args:] + 1624
  B4i Example          -[B4IShell runMethod:] + 448
 B4i Example          -[B4IShell raiseEventImpl:method:args::] + 1648
 B4i Example          -[B4IShellBI raiseEvent:event:params:] + 1580
 B4i Example          __33-[B4I raiseUIEvent:event:params:]_block_invoke + 60
 libdispatch.dylib    <redacted> + 24
 libdispatch.dylib    <redacted> + 16
 libdispatch.dylib    <redacted> + 1068
 CoreFoundation       <redacted> + 12
 CoreFoundation       <redacted> + 1924
 CoreFoundation       CFRunLoopRunSpecific + 436
 GraphicsServices     GSEventRunModal + 104
 UIKitCore            UIApplicationMain + 212
 B4i Example          main + 124
 libdyld.dylib        <redacted> + 4
)

Dim w2p As webp2png
Dim ss As Bitmap  ss=w2p.imageWithWebp(File.Combine(File.DirTemp,"1.webp"))
IV.Bitmap=ss
'IV is ImageView

Dim bmpImage As Bitmap
Dim Canvas1 As B4XCanvas
Dim out As OutputStream
Dim IV as ImageView
Dim WKWeb as wkwebview
If bmpImage.IsInitialized Then
    Canvas1.Initialize(bmpImage)
    IV.Bitmap=bmpImage
    out = File.OpenOutput(File.DirDocuments, "1.jpg", False)
    bmpImage.WriteToStream(out,100,"JPEG")
    out.Close
end if
WKWeb.LoadUrl($"${xui.FileUri(File.DirDocuments,"1.jpg")}"$)

#if objc
#import <WebP/decode.h>

-(UIImage *)convertWebPToUIimage: (NSString *) filePath{
    NSData *myData = [NSData dataWithContentsOfFile:filePath];
    int width = 0;
    int height = 0;
    WebPGetInfo([myData bytes], [myData length], &width, &height);
    uint8_t *data = WebPDecodeRGBA([myData bytes], [myData length], &width, &height);
    CGDataProviderRef provider = CGDataProviderCreateWithData(NULL, data, width*height*4, free_image_data);
    CGColorSpaceRef colorSpaceRef = CGColorSpaceCreateDeviceRGB();
    CGBitmapInfo bitmapInfo = kCGBitmapByteOrderDefault;
    CGColorRenderingIntent renderingIntent = kCGRenderingIntentDefault;
    CGImageRef imageRef = CGImageCreate(width, height, 8, 32, 4*width, colorSpaceRef, bitmapInfo, provider, NULL, NO, renderingIntent);
    return [UIImage imageWithCGImage:imageRef];
}

static void free_image_data(void *info, const void *data, size_t size)
{
    if(info != NULL)
    {WebPFreeDecBuffer(&(((WebPDecoderConfig *)info)->output));}
    else
    {free((void *)data);}
}

#End If

Dim no As NativeObject = Me
Dim bmp As Bitmap = no.RunMethod("convertWebPToUIimage:",Array(File.Combine(File.DirAssets,"1.webp")))

Dim Out As OutputStream
Out = File.OpenOutput(File.DirDocuments, "image.png", False)
bmp.WriteToStream(Out, 100, "PNG")
Out.Close