Adding GUScode.r