Return IP Octet Function

RouterOS Scripting
11

Short version:

 {
local CurIP "192.168.10.0/24"
put ("IP1oct: ".[pick $CurIP  0 [find $CurIP "."]])
put ("IP2oct: ".[pick $CurIP  0 [find $CurIP "." ([find $CurIP "."]+1)  ]])
put ("IP3oct: ".[pick $CurIP  0 [find $CurIP "." ([find $CurIP "." ([find $CurIP "."]+1)]+1)  ]])
put ("IP4oct: ".[pick $CurIP  0 [find $CurIP "/" ]])                                             
}                                                   
IP1oct: 192
IP2oct: 192.168
IP3oct: 192.168.10
IP4oct: 192.168.10.0

Example: ip firewall connection remove [find connection-mark~“wan1_Orange<->LANs” src-address~$IP3oct ]

Edit after @eworm answer:

{
local CurIP "192.168.10.1/24"
local IPoct [pick $CurIP  0 [find $CurIP "/" ]]
put ("IP1oct: ".($IPoct & 255.0.0.0))
put ("IP2oct: ".($IPoct & 255.255.0.0))
put ("IP3oct: ".($IPoct & 255.255.255.0))
put ("IP4oct: ".$IPoct)
}
IP1oct: 192.0.0.0
IP2oct: 192.168.0.0
IP3oct: 192.168.10.0
IP4oct: 192.168.10.1

Edit after @eworm answer:

{
local CurIP "192.168.10.1/24"
local IPoct [pick $CurIP  0 [find $CurIP "/" ]]
put ("IP1oct: ". [tonum (($IPoct>>24)&0.0.0.255) ] )
put ("IP2oct: ". [tonum (($IPoct>>16)&0.0.0.255) ] )
put ("IP3oct: ". [tonum (($IPoct>>8)&0.0.0.255) ] )
put ("IP4oct: ". [tonum (($IPoct>>0)&0.0.0.255) ] )
}
IP1oct: 192
IP2oct: 168
IP3oct: 10
IP4oct: 1