This was typed out of my head, so it might contain some errors, but it should work.
`Create camera arrays and max amount of cameras
amountOfCameras=10
dim cameraX(amountOfCameras)
dim cameraY(amountOfCameras)
dim cameraZ(amountOfCameras)
`Set each camera to a position
cameraX(0)=object position x(1)
cameraY(0)=object position y(1)
cameraZ(0)=object position z(1)-10
cameraX(1)=object position x(2)
cameraY(1)=object position y(2)
cameraZ(1)=object position z(2)-10
`Set initial camera
currentCam=0
do
`User controls
if upkey()=1 and currentCam<amountOfCameras-1 then inc currentCam
if downkey()=1 and currentCam>0 then dec currentCam
position camera cameraX(currentCam),cameraY(currentCam),cameraZ(currentCam)
loop
Whatever I did I didn't do it!