ARCVIEW教程20170325.doc

  1. 1、本文档共65页,可阅读全部内容。
  2. 2、有哪些信誉好的足球投注网站(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
  3. 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  4. 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
ARCVIEW教程20170325

ARCVIEW教程 第一章 概述 第1节 地理信息系统基本概念 地理信息 地理信息是表征地理圈内各种数量-质量、分布特征、空间关系和规律的数字、文字、图象、图形的总称。 地图概念 地图是地理信息的一种表达方式。它具有 比例尺 地图投影:地球表面的点与地图平面的点一一对应的数学关系。 地图投影变形分: 世界范围投影 濹卡托投影,属等角投影 属等积投影有爱凯特正泫等积伪圆柱投影,摩尔威特伪圆柱投影,SANSON投影,卡拂拉伊斯基正泫投影 半球范围投影 特定区域投影 属等角投影:Lambert投影,UTM投影,正射投影, 属等积投影:Albers投影,Bonna投影 属等距投影: 小范围投影 横轴等角割圆柱投影(Gass-kruger) 地图坐标 地理坐标:经纬度 平面直角坐标:按Gass-kruger投影,每个投影带的中央经线为Y,赤道为X,由此构成的平面直角坐标系称为Gass-kruger坐标。又通称为公里格网 公里格网与经纬度的转换 2 DEFDBL T-V,P,X-Z 10 CLS 12 DIM X(10),Y(10) 20 P=180/3 30 LOCATE 3,6:PRINT 南图廓边苇线 度分秒 40 LOCATE 5,6:PRINT 西图廓边经线 度分秒 50 LOCATE 3,20:INPUT B1:LOCATE 3,27:INPUT B2:LOCATE 3,35:INPUT B3:B=(B1+B2/60+B3/3600)/P 60 LOCATE 5,20:INPUT L1:LOCATE 5,27:INPUT L2:LOCATE 5,35:INPUT L3:L=(L1+L2/60+L3/3600)/P 70 L=(L1+L2/60+L3/3600)/P 80 LOCATE 7,20:INPUT 图比例尺分母,M 90 IF C*10000=M THEN 110 100 READ C,D:GOTO 90 110 C=3/D:D=2/D 120 IF M10000 THEN K=INT(L*P/6)+1:A=6*K-3:GOTO 140 130 ; K=INT((L*P+1.5)/9) 132 K=INT((L*P+1.5)/9):A=3*K 140 LPRINT CHR$(27)+I+L:LPRINT 高斯图廓坐标 150 LPRINT CHR$(27)+I+B:LPRINT M=;M;L0=;A;DI=;K 160 IF M100000! THEN Q=1 ELSE IF M=100000! THEN Q=2 ELSE IF M=200000! THEN Q=4 ELSE Q=6 170 G=C/Q:H=D/Q:K=0 180 FOR I=0 TO Q:FOR J=0 TO Q 182 X=B*P+I*H:Y=L*P+J*G 190 B1=INT(X):B2=INT((X-B1)*60+.1):B3=(X-B1)*3600-B2*60+.01 200 L1=INT(Y):L2=INT((Y-L1)*60+.1):L3=(Y-L1)*3600-L2*60+.01 210 LPRINT:LPRINT (;I;--;J;) 220 LPRINT 纬线;B1;度;B2;分;:LPRINT USING##.#;B3;:LPRINT 秒 230 LPRINT 经线;L1;度;L2;分;:LPRINT USING##.#;L3;:LPRINT 秒 240 ZZ=111134.8611#*X-16036.4803#*SIN(2*X/P)+16.8281*SIN(4*X/P)-.022*SIN(6*X/P) 250 GOSUB 470:N=6399698.9018#/SQR(1+U) 260 Z=(( ((270-330*T)*U-(58-T)*T+61)*V^2/360+(9+4*U)*U-T+5 )*V/12+1)*V*TAN(X/P)*N/2+ZZ 270 Y=(( ((14-50*T)*U-(10-T)*T+5) *V/20-T+U+1) *V/6+1)*N*COS(X/P)*Y 280 LPRINT X=;:LPRINT USING########.#;Z;:LPRINT Y=;:LPRINT USING#######.#;Y+500000! 290 IF (I=0 OR I=Q) AND (J=0 OR J=Q) THEN X(K)=Z:Y(K)=Y:K=K+1 300 NEXT J,I 302 STOP 310 IF M25000 OR M100000! THEN 390 320 X=B*P+D/2:Y=L*P+C/2:GOSU

文档评论(0)

tonggong82445 + 关注
实名认证
内容提供者

该用户很懒,什么也没介绍

1亿VIP精品文档

相关文档