Try something like this
Code:
Socket_RX_Start var word[4]
Socket_RX_Start[0]=W5100_S0_RX_Start
Socket_RX_Start[1]=W5100_S1_RX_Start
Socket_RX_Start[2]=W5100_S2_RX_Start
Socket_RX_Start[3]=W5100_S3_RX_Start
Then you won't need GetSocketRXAdress. In routines just use
WizStart = Socket_RX_Start[WizSocket] + (WizPtr & Socket_TX_MASK)