retire newent7

This commit is contained in:
flowtron
2021-08-18 17:08:50 +02:00
parent d98889c525
commit 75fe433613
2 changed files with 4 additions and 16 deletions
+2 -2
View File
@@ -312,8 +312,8 @@ menuinit [
menuitemslider "\fX> \f5Slope \t\f4S\f5: " -40 40 "$_clip06" 1 [ _clip06 = $arg1 ]
menuitemslider "> Shape \t" 0 3 "$_clip07" "regular sloped-x sloped-y rotated" [ _clip07 = $arg1 ] 1
menuitem "" -1
menuitem "\f2\t [ Place clip entity ]" [ newent7 clip (divf $_clip01 10) (divf $_clip02 10) (divf $_clip03 10) (divf $_clip04 10) 0 (divf $_clip06 10) $_clip07 ]
menuitem "\f2\t [ Place player clip entity ]" [ newent7 plclip (divf $_clip01 10) (divf $_clip02 10) (divf $_clip03 10) (divf $_clip04 10) 0 (divf $_clip06 10) $_clip07 ]
menuitem "\f2\t [ Place clip entity ]" [ newent clip (divf $_clip01 10) (divf $_clip02 10) (divf $_clip03 10) (divf $_clip04 10) 0 (divf $_clip06 10) $_clip07 ]
menuitem "\f2\t [ Place player clip entity ]" [ newent plclip (divf $_clip01 10) (divf $_clip02 10) (divf $_clip03 10) (divf $_clip04 10) 0 (divf $_clip06 10) $_clip07 ]
if $editing [
push x (editentity (getclosestent))
if (|| (strcmp (at $x 0) clip) (strcmp (at $x 0) plclip)) [
+2 -14
View File
@@ -315,9 +315,9 @@ const copyent [
if (> $entidx -1) [
push n (format2 "%1 %5 %6 %7 %8 %9 %010 %011" (editentity $entidx))
push d (switch (findlist "mapmodel sound" (at $n 0)) [mapmodelslotname (at $n 2)] [at (editmapsoundslot (at $n 1)) 0])
pasteent = [if $editing [if $editmetakeydown [showmenu [Paste entity]] [newent7 @@@n ; echo @@@n @@@d pasted.]]]
pasteent = [if $editing [if $editmetakeydown [showmenu [Paste entity]] [newent @@@n ; echo @@@n @@@d pasted.]]]
newmenu [Paste entity]
menuitem [paste: @n @d] [newent7 @n ; echo @n @d pasted.]
menuitem [paste: @n @d] [newent @n ; echo @n @d pasted.]
echo $n $d copied.
pop n d
]
@@ -325,18 +325,6 @@ const copyent [
]
]
const newent7 [ // like newent, but setting all seven attributes directly
if $numargs [
loop i 8 [ push [a@i] (if (< $i $numargs) [result $arg@(+ $i 1)])]
selectionwalk [] [
push n (addentity $a0)
if (strlen $n) [ editentity $n (at $sw_cursel 0) (at $sw_cursel 1) "" $a1 $a2 $a3 $a4 $a5 $a6 $a7 ]
pop n
]
loop i 8 [ pop [a@i] ]
]
]
// used by editent // editentity requires ent index, coordinates (via tempalias) and all seven attributes (via arguments)
const editentattr [
if (strlen $__editentprefix) [