一个可以生成碳纳米管坐标的FORTRAN程序,F77格式，是碳纳米管的物理特性一书中的程序-a program to generate Coordinate of carbon nanotubes

#include<iom16v.h> #include<macros.h> #define uchar unsigned char #define uint unsigned int uchar senserflag=0 //传感器状态标志 uchar count1=0 uchar jsflag=0 //金属标志 uchar task=1 //任务标志 uint distancedata=0 //路程值 uint distance