简单的16进制编译源码（星端）

xintu1987

因为还没做好~故发了最原始的上来~

哪些不足或错的请大家指教~！

1. char fp;
   
2. 
   
3. long openfile(int o){
   
4. char i,l;
   
5. char fname[20];
   
6. char noww[60];
   
7. 
   
8. memset(fname,0,20);memset(noww,0,60);
   
9. strcat(fname,o);
   
10. if(ChDir(fname)){
    
11. strcat(noww,fname);strcat(noww,"/");
    
12. }
    
13. else ChDir("/");
    
14. 
    
15. while(1){
    
16.   if (FileList(fname)){
    
17.     if(!strcmp(fname,"..")){
    
18.     if(!strcmp(fname,"..")&&strlen(noww)==1)return '0';
    
19.     for(i=strlen(noww);noww[i]!='/'&&i>0;i--){
    
20.     if(i<0)noww[i]=0;else strcpy(noww,"/");
    
21.     ChDir(noww);
    
22.     }
    
23.    
    
24.     continue;
    
25.     }//..
    
26.     if(ChDir(fname)){strcat(noww,fname);strcat(noww,"/");}
    
27.     else {strcat(noww,fname);return noww;}
    
28.   }//if
    
29.   else {
    
30.     if(strlen(noww)==1)return '0';
    
31.   for(i=strlen(noww);noww[i]!='/'&&i>0;i--){
    
32.     if(i<0)noww[i]=0;else strcpy(noww,"/");
    
33.     ChDir(noww);
    
34. 
    
35.   }
    
36.   }
    
37. 
    
38. }
    
39. }
    
40. 
    
41. 
    
42. 
    
43. int sl(long x){
    
44. int i,l,o;
    
45. char ts[100],zf[100];
    
46. memset(zf,0,100);
    
47. strcpy(ts,x);
    
48. i=strlen(ts);
    
49. for(l=0;l<i;l++){
    
50. if(ts[l]/16==0)strcat(zf,"0");
    
51. if(ts[l]/16==1)strcat(zf,"1");
    
52. if(ts[l]/16==2)strcat(zf,"2");
    
53. if(ts[l]/16==3)strcat(zf,"3");
    
54. if(ts[l]/16==4)strcat(zf,"4");
    
55. if(ts[l]/16==5)strcat(zf,"5");
    
56. if(ts[l]/16==6)strcat(zf,"6");
    
57. if(ts[l]/16==7)strcat(zf,"7");
    
58. if(ts[l]/16==8)strcat(zf,"8");
    
59. if(ts[l]/16==9)strcat(zf,"9");
    
60. if(ts[l]/16==10)strcat(zf,"A");
    
61. if(ts[l]/16==11)strcat(zf,"B");
    
62. if(ts[l]/16==12)strcat(zf,"C");
    
63. if(ts[l]/16==13)strcat(zf,"D");
    
64. if(ts[l]/16==14)strcat(zf,"E");
    
65. if(ts[l]/16==15)strcat(zf,"F");
    
66. o++;
    
67. 
    
68. 
    
69. 
    
70. if(ts[l]%16==0)strcat(zf,"0");
    
71. if(ts[l]%16==1)strcat(zf,"1");
    
72. if(ts[l]%16==2)strcat(zf,"2");
    
73. if(ts[l]%16==3)strcat(zf,"3");
    
74. if(ts[l]%16==4)strcat(zf,"4");
    
75. if(ts[l]%16==5)strcat(zf,"5");
    
76. if(ts[l]%16==6)strcat(zf,"6");
    
77. if(ts[l]%16==7)strcat(zf,"7");
    
78. if(ts[l]%16==8)strcat(zf,"8");
    
79. if(ts[l]%16==9)strcat(zf,"9");
    
80. if(ts[l]%16==10)strcat(zf,"A");
    
81. if(ts[l]%16==11)strcat(zf,"B");
    
82. if(ts[l]%16==12)strcat(zf,"C");
    
83. if(ts[l]%16==13)strcat(zf,"D");
    
84. if(ts[l]%16==14)strcat(zf,"E");
    
85. if(ts[l]%16==15)strcat(zf,"F");
    
86. o++;
    
87. 
    
88. 
    
89. }
    
90. return zf;
    
91. 
    
92. }
    
93. 
    
94. 
    
95. 
    
96. 
    
97. 
    
98. 
    
99. 
    
100. 
     
101. void main(){
     
102. char f,sstr[50],show[30],shoo[30],ch,tmp,new,tt[1000];
     
103. int x,y,i;
     
104. long l,k,d,nowp,hh[5];
     
105. 
     
106. i=openfile("/");
     
107. fp=fopen(i,"r+");
     
108. if(!fp)exit(0);
     
109. 
     
110. y=y+2;hh[0]=0;
     
111. k=fseek(fp,0,2);k=k-1;
     
112. printf("%d",k);
     
113. 
     
114. getchar();
     
115. rewind(fp);
     
116. while(1){
     
117. k=fseek(fp,0,2);k=k-1;
     
118. rewind(fp);
     
119. 
     
120. if(new==2){if(hh[4]>=k-8);else hh[0]=hh[1];;}
     
121. if(new==1)hh[0]=hh[0]-8;
     
122. ClearScreen();
     
123. 
     
124. for(i=0;i<5;i++){
     
125. if(nowp>=hh[i])y=i;
     
126. hh[i+1]=hh[i]+8;
     
127. }
     
128. 
     
129. for(i=0;i<5;i++){
     
130. memset(show,0,30);
     
131. 
     
132. if(hh[4]>=k){hh[0]=k-40;}
     
133. if(nowp>k)x=k%8*12;
     
134. else x=(nowp-hh[y])*12;
     
135. fseek(fp,hh[i],0);
     
136. fread(show,1,8,fp);
     
137. l=sl(show);
     
138. TextOut(1,i*13+2,l,1);
     
139. TextOut(105,i*13+1,show,1);
     
140. sprintf(sstr,"%d",nowp);
     
141. TextOut(1,70,sstr,1);
     
142. }
     
143. 
     
144. Block(x,y*13+1,x+12,y*13+13,2);
     
145. 
     
146. Refresh();new=0;
     
147. ch=getchar();
     
148. 
     
149. if(ch==30){
     
150. l=ss();if(l=='0')continue;
     
151. SetScreen(1);
     
152. printf("%d",l);getchar();
     
153. nowp=l;
     
154. hh[0]=l-l%8;continue;
     
155. }
     
156. if(ch==20){
     
157. if(hh[0]==0&&nowp<hh[1]){hh[0]=0;continue;}
     
158. nowp=nowp-8;
     
159. if(y==0){new=1;continue;}
     
160. }//20结束
     
161. 
     
162. else if(ch==21){
     
163. 
     
164. if(y==4)new=2;
     
165.   nowp=nowp+8;
     
166.   if(nowp>=k){nowp=k;continue;}
     
167.   }//21结束
     
168.   else if(ch==23){
     
169.   if(hh[0]==0&&nowp<=hh[0]){hh[0]=0;nowp=0;continue;}
     
170. if(nowp<=hh[0]){new=1; nowp--;continue;}
     
171.    nowp--;
     
172.   }//23结束
     
173. else if(ch==22){
     
174. if(nowp==k)continue;
     
175.   if(nowp==hh[4]+7){nowp=nowp+8;new=2;continue;}
     
176.   nowp++;
     
177.   
     
178.   }//22结束
     
179. 
     
180. if(k<8)hh[0]=hh[0]-40;
     
181. if(ch==13){
     
182. l=input("请输入替换的字符串");
     
183. strcpy(shoo,l);
     
184. fseek(fp,nowp,0);
     
185. fwrite(shoo,1,strlen(shoo),fp);
     
186. }
     
187. 
     
188. 
     
189. 
     
190. if(ch==27){fclose(fp);exit(0);}
     
191. 
     
192. }//while结束
     
193. 
     
194. 
     
195. }//main结束

复制代码

滴鱼

沙发，帮你顶顶

FrankHB

...两串if。。。。。

FrankHB

...
char a[2];
...
a[0]=ts[l]>>4;
...
if(isdigit(a[0]+0x30))strcat(zf,a);
else if(a[0]<16){a[0]=a[0]+'A'-10;strcat(zf,a);}
o++;
...

[ 本帖最后由 FrankHB 于 2008-2-24 12:57 编辑 ]

TYCY

LS的LS,你的签名????

FrankHB

？
有什么不对吗？