Tags Label Regions

[AZJIO]

I made a selection of how to mark a section of code.

Code: Select all

;- ### Constants ###
;- ●●● Declare ●●●
;-›››››› Global ‹‹‹‹‹‹
;-‴‴‴‴‴‴ Define ‴‴‴‴‴‴
;-► GUI ◄
;- ╔═ GUI ═╗
; Code
;- ╚═ GUI ═╝

;-┌──Loop──┐
; Code
;-└──Loop──┘

;-█ Loop
;-…… Gadget Events ……
;-…… Menu events ……

;- - - - Resize Gadget - - - -
;- - - - Drag and drop files - - - -
;- ╒══ Procedure ══╕
; Code
;- ╘════ End ════╛
;- ╓──Func──╖
; Code
;- ╙──End──╜
;- ██ current place of work ██
;- ▓▓ Region ▓▓
;- ▒▒ Region ▒▒
;- ░░ Region ░░
;-⁞⁞⁞⁞⁞⁞ Region ⁞⁞⁞⁞⁞⁞
;-≡≡≡ Region ≡≡≡
;-₪₪₪ Region ₪₪₪
;-♫♫♫ Region ♫♫♫
;-••• Region •••
;-■■■ Region ■■■
;-◘◘◘ Region ◘◘◘
;- ▬▬ Region ▬▬
;- ―― Region ――
;- !i!i!i!i Region !i!i!i!i
;- װװװװװ Region װװװװװ
;- ∕∕∕∕∕∕∕∕∕∕ Region ∕∕∕∕∕∕∕∕∕∕
;- ♦♦♦ Region ♦♦♦
;- ₩₩₩ Region ₩₩₩
;- ₦₦₦ Region ₦₦₦
;- ≠≠≠≠ Region ≠≠≠≠
;- ꞮꞮꞮ Region ꞮꞮꞮ
;- ֍֍֍ Region ֍֍֍
;- ꜜꜜꜜ Region ꜜꜜꜜ
;- ꜛꜛꜛ Region ꜛꜛꜛ
;- ⱶⱶⱶⱶⱶ Region ⱶⱶⱶⱶⱶ
;- ᴥᴥᴥ Region ᴥᴥᴥ
;- ¦¦¦¦¦¦¦¦¦¦ Region ¦¦¦¦¦¦¦¦¦¦
;- ⌂⌂⌂ Region ⌂⌂⌂
;- ≈≈≈ Region ≈≈≈
;- ~~~ Region ~~~
;-  ⃰  ⃰  ⃰ Region ⃰  ⃰  ⃰ 
;- ‡‡‡‡‡‡‡‡‡‡‡
;- ∑∑∑∑∑∑∑∑∑∑
;-▲▲▲▲▲▲▲▲
;-▼▼▼▼▼▼▼▼
;-▼▲▼▲▼▲▼▲
;-▲▼▲▼▲▼▲▼

[mk-soft]

Code: Select all

;-TOP

;- Begin Region A
;{
Procedure foo()
  
EndProcedure

Procedure foo2()
  
EndProcedure

;}
;- End Region A

;- Begin Region B
;{
Procedure fc()
  
EndProcedure

Procedure fc2()
  
EndProcedure

;}
;- End Region b


;- Begin Main
;{
Global var
foo()
;}
;- End Mains

[SPH]

I made a selection of how to mark a section of code.

Code: Select all

;- ### Constants ###
;- ●●● Declare ●●●
;-›››››› Global ‹‹‹‹‹‹
;-‴‴‴‴‴‴ Define ‴‴‴‴‴‴
;-► GUI ◄
;- ╔═ GUI ═╗
; Code
;- ╚═ GUI ═╝

;-┌──Loop──┐
; Code
;-└──Loop──┘

;-█ Loop
;-…… Gadget Events ……
;-…… Menu events ……

;- - - - Resize Gadget - - - -
;- - - - Drag and drop files - - - -
;- ╒══ Procedure ══╕
; Code
;- ╘════ End ════╛
;- ╓──Func──╖
; Code
;- ╙──End──╜
;- ██ current place of work ██
;- ▓▓ Region ▓▓
;- ▒▒ Region ▒▒
;- ░░ Region ░░
;-⁞⁞⁞⁞⁞⁞ Region ⁞⁞⁞⁞⁞⁞
;-≡≡≡ Region ≡≡≡
;-₪₪₪ Region ₪₪₪
;-♫♫♫ Region ♫♫♫
;-••• Region •••
;-■■■ Region ■■■
;-◘◘◘ Region ◘◘◘
;- ▬▬ Region ▬▬
;- ―― Region ――
;- !i!i!i!i Region !i!i!i!i
;- װװװװװ Region װװװװװ
;- ∕∕∕∕∕∕∕∕∕∕ Region ∕∕∕∕∕∕∕∕∕∕
;- ♦♦♦ Region ♦♦♦
;- ₩₩₩ Region ₩₩₩
;- ₦₦₦ Region ₦₦₦
;- ≠≠≠≠ Region ≠≠≠≠
;- ꞮꞮꞮ Region ꞮꞮꞮ
;- ֍֍֍ Region ֍֍֍
;- ꜜꜜꜜ Region ꜜꜜꜜ
;- ꜛꜛꜛ Region ꜛꜛꜛ
;- ⱶⱶⱶⱶⱶ Region ⱶⱶⱶⱶⱶ
;- ᴥᴥᴥ Region ᴥᴥᴥ
;- ¦¦¦¦¦¦¦¦¦¦ Region ¦¦¦¦¦¦¦¦¦¦
;- ⌂⌂⌂ Region ⌂⌂⌂
;- ≈≈≈ Region ≈≈≈
;- ~~~ Region ~~~
;-  ⃰  ⃰  ⃰ Region ⃰  ⃰  ⃰ 
;- ‡‡‡‡‡‡‡‡‡‡‡
;- ∑∑∑∑∑∑∑∑∑∑
;-▲▲▲▲▲▲▲▲
;-▼▼▼▼▼▼▼▼
;-▼▲▼▲▼▲▼▲
;-▲▼▲▼▲▼▲▼

Thank you for this original idea !

[AZJIO]

Code: Select all

;-TOP

I didn’t understand the meaning of the ;-TOP tag before

This is how the cycle looks better

Code: Select all

;-┌───Loop───┐
;-├ Gadget Events
;-├ Menu Events
;-└───Loop───┘

Code: Select all

;- ╔═ GUI ═╗
;- ╠ Buttons
;- ╠ Menu
;- ╚═ GUI ═╝

[STARGÅTE]

This is how the cycle looks better

Code: Select all

;-┌───Loop───┐
;-├ Gadget Events
;-├ Menu Events
;-└───Loop───┘

Code: Select all

;- ╔═ GUI ═╗
;- ╠ Buttons
;- ╠ Menu
;- ╚═ GUI ═╝

Do we talk about the procedure list of the PB IDE? Or do we talk about the code itself?

[AZJIO]

If we insert these marks into the code in the positions where they begin, then the corresponding view will be shown in the list of procedures. When we click on them we go to the place where they are located. The list of procedures will show a logical view of the code structure. There is a beginning of a loop and an end of a loop, and inside them there is a tree of events, within which it is easy to navigate to the necessary sections of the code.
Perhaps you are using BindGadgetEvent() instead of a loop, then you don't have a loop as such. But you can apply this to other areas of the code to divide it into blocks.

Code: Select all

;- TOP
;- # Constants
#Window = 0
;- # Enumeration
Enumeration Gadget
EndEnumeration
;- ● Declare
Declare SizeWindowHandler()
;- ● Global
Global h
;- ● Define
Define w

;-┌───GUI───┐
If OpenWindow(#Window, 0, 0, w, h, Lng(5), #PB_Window_SystemMenu
;- ├ Buttons
	ButtonImageGadget(#btnOpen, w - 270, 120, 30, 30, ImageID(2))
;- ├ Menu
	If CreatePopupMenu(#MetaMenu)
	EndIf
;- ├ CheckBox
	CheckBoxGadget(#Ch_OnTop, 280, 2, 120, 20, "OnTop")
;-┌───Loop───┐
	Repeat
		Select WaitWindowEvent()
;-├ Menu events
			Case #PB_Event_Menu
;-├ Gadget Events
			Case #PB_Event_Gadget
				Select EventGadget()
					Case #PB_Event_CloseWindow
						End
				EndSelect
		EndSelect
	ForEver
;-└───Loop───┘
EndIf

;- ╒══ Procedure ══╕
Procedure SizeWindowHandler()
EndProcedure
;- ╘════ End ════╛

[Caronte3D]

Nice idea
(seems good candidate for a PB-Tool)

[AZJIO]

(seems good candidate for a PB-Tool)

I'm using AutoCompletionIDE. I added embed tags. Open the file "2-Tracing_paper.lst" and add these lines:

Code: Select all

Tag GUI|;-┌───GUI───┐
Tag Loop|;-┌───Loop───┐
Tag Loop End|;-└───Loop───┘
Tag Buttons|;- ├ Buttons
Tag Menu|;- ├ Menu
Tag CheckBox|;- ├ CheckBox
Tag Menu Events|;-├ Menu Events
Tag Gadget Events|;-├ Gadget Events
Tag Procedure|;- ╒══ Procedure ══╕
Tag End|;- ╘════ End ════╛
Tag Constants|;- # Constants
Tag Enumeration|;- # Enumeration
Tag Declare|;- ● Declare
Tag Global|;- ● Global
Tag Define|;- ● Define

[Caronte3D]

Nice!
You forgot:

Code: Select all

Tag GUI End|;-└───GUI───┘

[Axolotl]

Nice, thanks for sharing.
Well, I am doing something similar, not even such fancy.
With this new start keyword i have the folding combined with the entry in the procedure list.

Code: Select all

; ==> Add ;-{ to the  Folding start Keywords (Menu: File | Preferences.... in Dialog: Preferences | Editor | Folding) 
;-{·} Usage: pbcompilerc "Filename" ..... 
; all the things I don't have to read every time 
;} End of Usage 

[Kwai chang caine]

Very nice tags

Personaly, i use another and old simples personal tags

Code: Select all

; ##########################
;       PROCEDURES
;  ########################## 

I didn’t understand the meaning of the ;-TOP tag before

Yes... Me too
It's not really difficult to see It's the top of the page, when there are nothing above