明经CAD社区

 找回密码
 注册

QQ登录

只需一步,快速开始

搜索
楼主: 飞的妖儿

[讨论] 怎样赚明经币啊求教啊。。

  [复制链接]
发表于 2010-9-4 13:18:00 | 显示全部楼层

我今天注册的新人报道!

发表于 2010-9-5 02:42:00 | 显示全部楼层

是啊 怎么挣

我也要挣

下不了东东了

发表于 2011-4-28 11:35:48 | 显示全部楼层
怎麼才能有;;;********************************************************************13 y/ @# n9 e& X4 h9 d
;;;自动计算总周长和线割面积3 O  o! z$ R% c6 d' J
;;;command: zzc
;;;2005-10-24     Chen Jian* V; n$ \3 W. T6 M& D! Z9 a( o) \, t
;;;Version 1.1( q. h6 b1 b2 C5 c7 ~+ z
;;;2004-01-13     Chen Jian
;;;Version 1.0
;;;MADE IN CHINA( ?9 O- t, J5 }" G7 c# U/ b
(defun c:zzc (/ en1 en1-data en1-ccolor ss i sum en dd h pt area)
  (command "undo" "be")
  (setvar "cmdecho" 0)* u% L$ A+ Y) V5 ]# [- S9 |3 Y% Y' N
  (princ "取得要计算对象的颜色")5 m( g- m3 [# e% ]
  (setq en1 (ssget))
  (if (null en1)
    quit4 {! I0 v, g+ u" R" Y
  )
  (setq en (ssname en1 0))! s" }# b6 w8 a4 g! D
  (setq en1-data (entget en))
  (setq en1-ccolor (cdr (assoc 62 en1-data)))4 B2 i$ u5 f. t1 r. t5 d! h% x
  (setq ss (ssget (list (cons 62 en1-ccolor))))
  (if (null ss)# k. G- Q+ v9 d8 }# U' f. V
    quit
  )
  (setq i 0)
  (setq sum 0)
  (repeat (sslength ss)' Y# @8 Y+ @# Q9 a+ u6 A
    (setq en (ssname ss i))9 M( B/ m  ?( d% F$ V. ~! W5 J
    (command "lengthen" en "")
    (setq dd (getvar "perimeter")): i: d3 Z! y0 S" B
    (setq sum (+ sum dd))- @4 K, {. x# p
    (setq i (1+ i))8 t4 j9 {/ x( r* t8 k: q7 J
  )
  (setq h nil)
  (setq h (getreal "\n料厚 H[15/18/20/22/23/25/30]<14>: "))" F5 \2 \" v2 _: d. |/ [0 j) \0 t/ Z
  (if (null h)2 G( S; M  W+ {
    (setq h 14.0)$ d8 s  p, N6 `) G2 a
  )
  (setq pt (getpoint "\n文字位置点: ")). q# @* d9 x4 L; x$ k$ |) V3 ^
  (setq area (* sum h))9 F2 k0 H- k- Z# x9 ~. P
  (princ (strcat "\n总长度=" (rtos sum 2))). e0 T1 M* K7 c1 E, k& j) ]
  (princ (strcat "线割总面积=" (rtos area 2)))! h" p  }. b2 R1 _3 ]4 W5 B  c
  (setq xx "autodim")
  (command "style" xx "MONOTXT.SHX" "0" "" "" "" "" "") ;
  (setvar "TEXTSTYLE" xx)
  (command "text"
           pt: i" O/ ?$ e0 r( C4 b
           "2.5"
           "0"! ?* S* J' y5 ~$ r9 i
           (strcat "COLOR:"
                   (rtos en1-ccolor 2 0): i  G' k) q  [, h7 L
                   " ALL-LENGTH="
                   (rtos sum 2)
                   " <TC>AREA="  F( Q- z, u: Y% @- q9 b! U" v# r
                   (rtos area 2)
                   " T="
                   (rtos h 2 2)
           )
  )5 u( U7 D2 Z- v8 [' [
  (setq ss nil)9 A* k4 d& A1 t: X
  (command "undo" "e")  r. l0 w0 ]2 G& X: J9 {4 \9 }8 m
  (Princ
    "\n---------------Bye c:ZZC 自动计算总周长和线割面积---------------"
  )
  (prin1)
)

评分

参与人数 1明经币 +1 收起 理由
mccad + 1 如果注明功能,并另起帖,可能还能更多点分

查看全部评分

发表于 2011-4-28 21:46:18 | 显示全部楼层
多发好贴可以送的,还有就是多来看看,发贴一个可以得0.2个币,发5个贴就可以得一人了。登别人的空间也可以得币
发表于 2011-4-28 22:28:38 | 显示全部楼层
回复 飞的妖儿 的帖子

很简单,把你的程序拿到这儿来卖,然后你就有钱了。同现实生活中的买卖一样一样的。
发表于 2011-5-10 22:47:03 | 显示全部楼层
j就是啊,有金钱为什么兑换不了明镜比啊!

发表于 2018-8-13 15:07:57 | 显示全部楼层
自贡黄明儒 发表于 2011-4-28 22:28
回复 飞的妖儿 的帖子

很简单,把你的程序拿到这儿来卖,然后你就有钱了。同现实生活中的买卖一样一样的。

明经币能当钱用啊,可以转换成RMB吗
发表于 2018-8-24 23:55:36 | 显示全部楼层
明经币可以用金钱换  但是金钱是怎么来的
发表于 2018-8-26 08:29:18 | 显示全部楼层

这个币好像很难赚。。我已经有金钱了想换可怎么都换不了
发表于 2019-2-8 20:08:26 | 显示全部楼层

我都想知!具体有那些途径啊?
您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|CAD论坛|CAD教程|CAD下载|联系我们|关于明经|明经通道 ( 粤ICP备05003914号 )  
©2000-2023 明经通道 版权所有 本站代码,在未取得本站及作者授权的情况下,不得用于商业用途

GMT+8, 2025-6-25 18:45 , Processed in 0.143064 second(s), 19 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表