clc
clear

e2s=50;%眼距屏幕位置（厘米）
b2s=50;%虛擬背景位置（厘米）
eed=6.5;%瞳孔間距（厘米）
realsiz=[3117.5];%屏幕真實物理尺寸
scrsiz=[1366768];%屏幕像素尺寸/屏幕分辨率
cm2p=1366/31;%（厘米/像素）單位轉換

A=imread（‘C:\Program?Files\MATLAB\R2010b\Psychtoolbox\3d\1.jpg‘）;
%導入原始背景圖像
A=rgb2gray（A）;

%%?厘米轉像素
Pe2s=e2s*cm2p;
Pb2s=b2s*cm2p;
Peed=6.5*cm2p;

%%?生成目標虛擬圖像上每個點的高度的矩陣?h（xy）
siz=[331600];%屏幕大小
center0=siz/2;%球中心
R=200;%球半徑
for?x=1:siz（1）
????for?y=1:siz（2）
????????l（xy）=（（center0（1）-x）^2+（center0（2）-y）^2）^.5;
????????if?l（xy）>R
????????????l（xy）=R;
????????end