B4R Question [SOLVED] MAX6675 & esp8266 anyone?

Sub Process_Globals
    Public Serial1 As Serial
End Sub

Private Sub AppStart
    Serial1.Initialize(115200)
    Dim tc_f As Float = RunNative("read_tc_f",Null)
    '// For the MAX6675 to update, you must delay AT LEAST 250ms between reads!
    Dim tc_c As Float = RunNative("read_tc_c",Null)
    Log("Temp:[C]: ",tc_c)
    Log("Temp:[F]: ",tc_f)
End Sub

#if C
#include "max6675.h"

int thermoDO = 4;int thermoCS = 5;int thermoCLK = 6;
B4R::Object res;
MAX6675 thermocouple(thermoCLK, thermoCS, thermoDO);

B4R::Object* read_tc_f (B4R::Object* o) {
   return res.wrapNumber(thermocouple.readFahrenheit());
}

B4R::Object* read_tc_c (B4R::Object* o) {
   return res.wrapNumber(thermocouple.readCelsius());
}
#End if

'This basic example reads the thermosensor every 10 seconds and logs the temperature in C. Tested with Arduino UNO.
Sub Process_Globals
    Public serialLine As Serial
    'MAX6675
    Private maxx As MAX6675
    Private PINSCK As Byte = 10
    Private PINCS As Byte = 9
    Private PINSO As Byte = 8
    'Timer for reading
    Private timerRead As Timer
    Private READ_INTERVAL As ULong = 10000
End Sub

Private Sub AppStart
    serialLine.Initialize(115200)
    maxx.Initialize(PINSCK, PINCS, PINSO)
    timerRead.Initialize("TimerRead_Tick", READ_INTERVAL)
    timerRead.Enabled = True
    TimerRead_Tick
End Sub

Sub TimerRead_Tick
    'Temperature=20.7 Celsius
    Log("Temperature=", NumberFormat(maxx.ReadCelsius, 0, 1), " Celsius")
End Sub

MAX6675 = WeMOS D1 Mini
GND = GND
VCC = 5v
SCK = Pin D5 (GPIO14)
CS  = Pin D6 (GPIO12)
SO  = Pin D7 (GPIO13)
Thermosensor: RED = +, BLUE = -

Sub Process_Globals
    Public serialLine As Serial
    Private maxx As MAX6675
    Private PINSCK As Byte    = 14    'GPIO14 = Pin D5 
    Private PINCS As Byte    = 12    'GPIO12 = Pin D6
    Private PINSO As Byte    = 13    'GPIO13 = Pin D7
    Private timerRead As Timer
    Private READ_INTERVAL As ULong = 5000
End Sub

Private Sub AppStart
    serialLine.Initialize(115200)
    maxx.Initialize(PINSCK, PINCS, PINSO)
    timerRead.Initialize("TimerRead_Tick", READ_INTERVAL)
    timerRead.Enabled = True
    TimerRead_Tick
End Sub

Sub TimerRead_Tick

    Log("Temperature=", NumberFormat(maxx.ReadCelsius, 0, 1), " Celsius")
End Sub