HOME HELP 新着記事 ツリー表示 発言ランク ファイル一覧 検索 過去ログ

■236 / 1階層)  折返階段UP・DN記号を
□投稿者/ makino 1回-(2006/07/26(Wed) 15:05:34)
https://www.geocities.jp/se_m646/

    記事内容:[|] 

    N.Misumiさま、皆さんこんにちは。

    新バージョンでの変形データーを作って見ました。
    とりあえず縦用です。
    開始点がUP側になり、方向(角度)で向きが変わります。

    以下データー

    #折返階段UP・DN記号(縦用) 対角指示(角度で向き変更)

    gpoint_read2
    #図形をW2000XH2000で作成
    %gpread_x1=0
    %gpread_x2=2000
    %gpread_y1=0
    %gpread_y2=2000

    %haba=abs(%gpread_x2-%gpread_x1)-2000
    %takasa=abs(%gpread_y2-%gpread_y1)-2000

    $sen_kakudo:%gpread_x1:%gpread_y1:%gpread_x2:%gpread_y2
    %kakudo1=%result_a

    line:500+%haba*0.25:1500+%takasa*0.75:500+%haba*0.25:0:0:0:0:-1
    line:500+%haba*0.25:1500+%takasa*0.75:1500+%haba*0.75:1500+%takasa*0.75:0:0:0:-1
    line:1500+%haba*0.75:1500+%takasa*0.75:1500+%haba*0.75:0:0:0:0:-1
    arc:1500+%haba*0.75:0:20:1:180:180:0:0:0:-1
    arc:500+%haba*0.25:0:20:1:180:180:0:0:0:-1
    moji:500+%haba*0.25:-250:0:2:6:0:"UP":-1
    moji:1500+%haba*0.75:-250:0:2:6:0:"DN":-1

    #矢印
    line:1500+%haba*0.75:507.9912:1557.4194+%haba*0.75:722.2837:0:0:0:-1
    line:1500+%haba*0.75:722.2837:1557.4194+%haba*0.75:722.2837:0:0:0:-1
    line:1500+%haba*0.75:507.9912:1442.5805+%haba*0.75:293.6987:0:0:0:-1
    line:1500+%haba*0.75:293.6987:1442.5805+%haba*0.75:293.6987:0:0:0:-1
    #破断
    line:1644.8888+%haba*0.75:546.814:2081.8317+%haba*0.75:663.8925:0:0:0:-1
    line:1355.1111+%haba*0.75:469.1683:1425.8218+%haba*0.75:591.6428:0:0:0:-1
    line:1425.8218+%haba*0.75:591.6428:1574.1781+%haba*0.75:424.3396:0:0:0:-1
    line:1574.1781+%haba*0.75:424.3396:1644.8888+%haba*0.75:546.814:0:0:0:-1
    line:1355.1111+%haba*0.75:469.1683:909.2517+%haba*0.75:349.7007:0:0:0:-1

    %yoko_bai1=1
    %tate_bai1=1

    if %kakudo1>90 then
    %yoko_bai1=-1
    %tate_bai1=1
    endif
    if %kakudo1>180 then
    %yoko_bai1=-1
    %tate_bai1=-1
    endif
    if %kakudo1>270 then
    %yoko_bai1=1
    %tate_bai1=-1
    endif

    $readkakudo_set:0
    $bairitu_set:%yoko_bai1:%tate_bai1

記事引用 [メール受信/OFF] 削除キー/

前の記事(元になった記事) 次の記事(この記事の返信)
←MaCAD 2.62にアップです。 /N.Misumi →少し修正してみました。 /makino
 
上記関連ツリー

Nomal MaCAD 2.62にアップです。 / N.Misumi (06/07/24(Mon) 09:44) #234
Nomal 折返階段UP・DN記号を / makino (06/07/26(Wed) 15:05) #236 ←Now
  └Nomal 少し修正してみました。 / makino (06/07/27(Thu) 16:01) #237
    └Nomal Re[3]: また・・修正です。 / makino (06/07/28(Fri) 13:25) #238
      └Nomal 次は横向き用です / makino (06/07/29(Sat) 11:55) #239

All 上記ツリーを一括表示
 
上記の記事へ返信