Source position: intuition.pas line 4006
function SetScreenBitMapInstance(
Scr: PScreen;
ID: LongWord;
Source: Pointer
):LongWord;