Strona 1 z 1
Szukam dobrego suba wybranie na pasek klinowy
: 12 lip 2026, 14:40
autor: kszumek
Witam
ten sub z 3 strony forum mi nie działa nie wiem czemu
( ------------------------------ )
( WYBRANIE PASEK )
( ------------------------------ )
( Adam )
( Time-stamp: <2017-12-23 21:00> )
( ------------------------------ )
(info: klin )
o<klin> sub
wyskakuje Parse_FILE INTERP_ERROR
chatgpt skleił mi z kolei bubla
poratuje ktoś czymś dość pilnie
lub podpowie jak naprawić powyższy
zdaje mi się że kiedyś mi chodził na starszej wersji teraz mam 2.9.4
pozdrawiam
Re: Szukam dobrego suba wybranie na pasek klinowy
: 12 lip 2026, 15:19
autor: kamar
Kod: Zaznacz cały
( ------------------------------ )
( P A S E K K L I N O W Y )
( ------------------------------ )
( Kamar )
( Time-stamp: <2019-09-26 09:18> )
( ------------------------------ )
(info: Rowek na pasek klinowy A )
o<pasek_klinowy> sub
#<obr> = #1 (=400 obroty)
#<sr_kola> = #2 (=200 średnica koła)
#<kanal> = #3 (=4 szerokość kanału)
#<pas> = #4 (=17 szerokość pasa)
#<noz> = #5 (=2 szerokość noża)
#<dobieranie> = #6 (=1 dobieranie)
#<posuw_obrot> = #7 (=0.2 posuw/obrót)
#<fazka> = #8 (=1 fazka)
#<ilosc_kanalow> = #9 (=1 ilość kanałów)
#<odstep> = #10 (=20 odstęp)
#<sr_wewn> = #11 (=180 średnica wewnętrzna)
#<posuw_prosty> = #12 (=0.1 posuw/obrót prosty)
#<z_pocz> = #13 (=0 Z początkowe)
m3 s#<obr>
g43
#<polnoz> = [#<noz> / 2]
#<posuw> = [#<posuw_obrot> * #<obr>]
#<posuw_pr> = [#<posuw_prosty> * #<obr>]
#<nr_kan> = 0
o500 while [#<nr_kan> lt #<ilosc_kanalow>]
#<z_srodek> = [#<z_pocz> + #<nr_kan> * #<odstep>]
( Toczenie proste w środku kanału - jedno przejście )
G0 X[#<sr_kola> + 2]
G0 Z[#<z_srodek> + [#<kanal> / 2] - #<polnoz>]
G1 X#<sr_kola> F#<posuw_pr>
G1 X#<sr_wewn>
G0 X[#<sr_kola> + 2]
( Roztaczanie boków )
#<z_konc> = [#<pas> / 2]
#<z_akt> = [#<kanal> / 2]
o100 while[#<z_akt> lt #<z_konc>]
#<z_akt> = [#<z_akt> + #<dobieranie>]
o120 if[#<z_akt> GT #<z_konc>]
#<z_akt> = #<z_konc>
o120 endif
#<x_konc> = [[#<sr_kola>] - [[#<z_akt> - [#<kanal> / 2]] / [TAN[9]]]]
G0 X[#<sr_kola> + 2]
G0 Z[#<z_srodek> + #<z_akt> - #<polnoz>]
G1 X#<sr_kola> F#<posuw>
G1 X#<x_konc> Z[#<z_srodek> + [#<kanal> / 2] - #<polnoz>]
G0 X[#<sr_kola> + 2]
G0 Z[#<z_srodek> - #<z_akt> + #<polnoz>]
G1 X#<sr_kola> F#<posuw>
G1 X[#<x_konc>] Z[#<z_srodek> - [#<kanal> / 2] + #<polnoz>]
o100 endwhile
( Fazki )
o400 if [#<fazka> gt 0]
G0 X[[#<sr_kola>] + 2]
G0 Z[#<z_srodek> + #<z_akt> - #<polnoz> + #<fazka>]
G1 X#<sr_kola> F#<posuw>
G1 X[#<sr_kola> - #<fazka>] Z[#<z_srodek> + #<z_akt> - #<polnoz>]
G0 X[[#<sr_kola>] + 2]
G0 Z[#<z_srodek> - #<z_akt> + #<polnoz> - #<fazka>]
G1 X#<sr_kola> F#<posuw>
G1 X[#<sr_kola> - #<fazka>] Z[#<z_srodek> - #<z_akt> + #<polnoz>]
o400 endif
#<nr_kan> = [#<nr_kan> + 1]
o500 endwhile
G0 X[[#<sr_kola>] + 10] z0
o<pasek_klinowy> endsub